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IDENTIFICATION 
PRODUCT CODE: AC-A791B=MC 
PRODUCT NAME : CZTEABO TMO3-TE16/TU77 CONTROL LOGIC TEST PART I 
DATE CREATED: 15 NOV 78 
MAINTAINER: DIAGNOSTIC ENGINEERING 
AUTHOR : J. G. ADAMS 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO 
CHANGE WITHOUT NOTICE AND SHOULD NOT os CONSTRUED 


AS A_COMMITMENT BY DIGITAL EQUIPMENT CORPORATION. 
DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN 
THIS MANUAL. 


THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS 
FURNISHED TO THE PURCHASER UNDER A LICENSE FOR USE 
ON A SINGLE COMPUTER SYSTEM AND CAN BE COPIED 
(WITH INCLUSION OF DIGITAL*S COPYRIGHT NOTICE) 
ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY 
OTHERWISE BE PROVIDE IN WRITING BY DIGITAL. 


DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBLILTY FOR THE USE OR RELIABILITY OF ITS 
yA tg ON EQUIPMENT THAT IS NOT SUPPLIED BY 


COPYRIGHT (@) 1977,1978 BY DIGITAL FQUIPMENT CORPORATION 





. 3 
CZTEABO aa dal CTL, I MACY11 30A(1052) 21=DEC-78 13:08 PAGE 2 
CZ7TEAB.P11 15=NOV=78 13:10 . SEQ 0002 


TABLE OF CONTENTS 
PARAGRAPH SUBJECT PAGE 


ABSTRACT 
REQUIREMENTS 
LOADING PROCEDURE 
STARTING PROCEDURE 
SWITCH SETTINGS 
ERROR PRINTOUTS 
OPERATION 

SUBTEST SUMMARIES 
LISTING 


OONAWEWR = 


WO 0008 NNW 
os 


D1 
CZTEABO TMO3-TE16/TU77 CTL I MACY71 30A(1052) 21=DEC-78 13:08 PAGE 3 
CZTEAB.P11 15-NOV=78 13:10 


ABSTRACT 


THIS PROGRAM IS DESIGNED TO 7 ae TEST ALL 
CONTROL LOGIC FUNCTIONALY OF THE TMO3. 

EACH TEST WILL ATTEMPT TO ISOLATE FAILURES 

TO THE MODULE LEVEL AND PROVIDE PRINTOUT INFORMATION 

WHICH WILL IDENTIFY THE FAILING MODULE. 

THE CONTROL LOGIC TESTS TEST ALL ERROR AND STATUS CONDITIONS AS WELL AS 
ADDRESSING PROTOCOL AND OPERATIONAL LOGIC SEQUENCES. 

THE LEVEL OF FAULT ISOLATION IS POSSIBLE BECAUSE OF 

ThO3 THE STRUCTURE AND ITS MAINTAINENCE MODES. 


REQUIREMENTS (HARDWARE ) 


ANY PDP-11 PROCESSOR 

8k OF CORE 

CONSOLE TTY 

TMO3 MAGTAPE CONTROLLER 


MASSBUS CONTROLLER (RH) 
TE16 MAGTAPE TRANSPORT 


LOADING PROCEDURE 


USE STANDARD PROCEDURE FOR LOADING BINARY PAPER TAPE. 
STARTING PROCEDURE 


THERE ARE TWO (2) STARTING ADDRESSES THAT MAY BE USED: 
200(8) AND 210(8). 


A. 200(8): STARTING AT THIS ADDRESS WILL CAUSE A PROGRAM 
+g kee HEADER TO BE PRINTED BEFORE TESTING 


B. siete STARTING AT THIS ADDRESS WILL NOT PRINT THE 
IDENTIFICATION HEADER AND IS THEREFORE GENERALLY 
TO BE USED FOR RESTARTS RATHER THAN INITIAL START 


NOTE SEE ALSO SECTION 5-CONSOLE SWITCH SETTINGS 
TYPE “C TO RESTART PROGRAM (@200) 
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4.1 AUTOMATIC MODE OPERATION 


IF THIS PROGRAM IS LOADED & RUN UNDER AUTOMATIC (CHAIN) MODES 
DEFAULT RESPONSES TO OPERATOR po tae ARE — AND THE SOF TWARE 
SWR INVOKED WITH A SWITCH SETTING OF 000000 . 

OPERATOR INTERVENTION IS REQUIRED. oN ORDER to. SET THE SWR TO 

A DIFFERENT SETTING, CHANGE LOC:176(SWREG) TO THE DESIRED SETTING. 


**EXCEPT ION: i THIS PROGRAM IS LOADED VIA TMDP CHAIN MODE THE 
PROGRAM WILL NOT TEST TMO3 DRIVE #0, TE16 SLAVE 40. 


**NOTE: THIS PROGRAM IS to he fe TO EXPECT SLAVE hag | 
AS_TE16; IF IT IS TO BE RUN IN CHAIN MODE ON A TU77 
THE SLAVE TYPE WORD (SLVTYP: AT L0C:1010) MUST BE SET 
TO A ONE INSTEAD OF A ZERO. (TE16=0/TU77=1) 


**NOTE: THIS PROGRAM CONTAINS OPERATOR INTERVENTION TESTS.TO RUN 
THESE TESTS THE PROGRAM MUST BE LOADED IN "DUMP" MODE 
AND SWO9 SET TO 1. 


SAMPLE START AT 200 


**NOTE: DEFAULT RESPONSES ARE SHOWN IN ANGLE BRACKETS <>, 
OPERATOR RESONSES ARE SHOWN IN PARENTHESES (), AND 
MEMORY LOCATIONS CONTAINING THE DEFAULT ARE SHOWN IN 
SQUARE BRACKETS [). 
IN THIS EXAMPLE THE OPERATOR HAS CHOSEN DEFAULT RESPONSES. 
TO INVOKE THE DEFAULT TYPE (CR). 


** NON-STANDARD JUMPER MODE 
M8931 (W2 IN) ,M8937 (W2 IN,W1 OUT) ** 


PARAMETER REQUEST: <DEFAULT> (RESONSE) CLOCATION: J 


TMO3-TE16 CONTROL LOGIC TEST- PART I (DZTEA-B) 
***ASSURE TAPE IS AT BOT*** 
TYPE *C TO RESTART 


REGISTER START: <172440> (CR) CREGS:] 
VECTOR ADDRESS: <224> (CR) CVECT:] 
: er JUMPERED IN NON-STANDARD MODE 

YPE 2 FOR STANDARD OR CR FOR STANDARD <3> ([CJUMPER:J] 
1MOS DRIVE: <0> Val CDRVN: J 
TE16 SLAVE: <0> ( CSLVN :J 
STATIC TESTS ots “o> (CR) CSTATC:] 
SLAVE TYPE (O=TE16,1=TU77): <O> (CR) revive: J 

IF THE SOF TWARE SWR 1S INVOKED: 
= <0000005 NEW = ‘CR) CSWREG: ] 
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CONSOLE SWITCH SETTINGS 


CONTROL : 


1) CONTROL G <*G>; 
INVOKES THE SOFTWARE SWR AND ALLOWS og en ENTER SWITCH SETTING 
THE MACHINE WILL THEN TYPE: SWR=XXXXXX NEW 
WHERE: XXXXXX IS THE OCTAL CONTENTS OF THE SOFTWARE SWITCH REGISTER. 
AFTER THE *NEW=" HAS BEEN Aha THEN THE OPERATOR CAN DO ONE 
OF THE FOLLOWING AT THE TTY 
A) TYPE THE NEW SWITCH SETTING 
B)IF A <CR> IS THE FIRST KEY DEPRESSED seg SOFTWARE SWITCH 
REGISTER CONTENTS WILL NOT BE CHANGED 


CONTROL A <*A> 
ALTERNATES Swit cH REG:STER FROM HARDWARE TO SOFTWARE & VICE VERSA 


CONTROL C <*C> 
RESTARTS THE PROGRAM AT 200 


CONTROL U <“U>; 
DELETES ALL CHARACTERS TYPED IN RESPONSE TO A REQUEST 


ALL SWITCHES ARE USED (0-15) AND THE NORMAL, OR DEFAULT, RUN 
IS DONE WITH ALL SWITCHES SET TO ZERO (0). 
ALL SWITCHES ARE DYNAMIC AND MAY BE CHANGED AT ANY TIME. 


SW15: 1=HALT ON ERROR 


O=CONT INUE 
SW14: 1=LOOP ON ERROR (SCOPE) 
O=CONT INUE 
SW13:  1=DO NOT PRINT ERRORS 
O=PRINT ALL ERRORS 
SW12: 1=DO CONTINUOUS CYCLE 
O=HALT AT END OF PASS 
SW11: 1=INHIBIT ITERATIONS 
O=ITERATE EACH TEST ITS ASSIGNED AMOUNT 
Sw10: =HALT AT END OF er T TEST 
- =CONTINUE TO NEXT T 


NHI IT TE 
Sw5-0: SELECT INDIVIDUAL TEST ** QO=DO ALL TESTS 
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ERROR PRINTOUTS 


ERROR PRINTOUTS WILL APPEAR IN TWO FORMS ONE FOR THE CONTROL 
LOGIC TESTS AND ANOTHER FOR THE DATA TESTS. 


CONTROL 3 PRINTOUTS 457. CONTAIN A HEADER WHICH CALLS 


SEC NE WILL at INF ORMAT ION 
E BOTH THE EXPECTED RESULT AND THE ACTUAL 
ULT OF THE TEST WILL BE GIVEN. L THE 

OF THE ERROR AND 


LINE FOUR WILL PRINT THE ITERATION NUMBER WHEN APPLICABLE. 


DATA TESTS WILL PRINT A ge: CONTAINING ag TEST NUMBER, 
AND A DESCRIPTION OF THE FUNCTION UNDER TEST 

FOLLOWING THE HEADER WILL BE A LIST OF THE MAJOR aun. a 
WITH THE EXPECTED AND ACTUAL VALUES. ANY BAD DATA WILL BE 
PRINTED (PER CHARACTER) FOLLOWING THE REGISTER INFORMA ION OR 
FOLLOWING THE HEADER IF NO STATUS ERRORS WERE ENCOUNTERED. 


EXAMPLES: 


1. THE FOLLOWING EXAMPLE SHOWS A TYPICAL ERROR 
PRINTOUT FOR THE ADDRESS TESTS (LT1=-LT3). 


LOGIC TEST 1: DRIVE ADDRESSING (M8909 OR RH) 


NON-EXIST DRIVE 3 EXPT-NOT RECVD 
ITER: 3 


THIS PRINTOUT SHOWS THAT THE DRIVE ADDRESS (CS2 BITS 2,1,0) 
RESULTED IN THE DETECTION OF NED (BIT 1. OF CS2) FOR DRIVE 
THREE (3) WHEN THAT DRIVE SHOULD BE THERE. THIS ERROR OCCURRED 
ON ITERATION THREE (3). 


2s Ten. WILL SHOW A TYPICAL PRINTOUT OF ONE OF THE REGISTER 


IC_TEST 7: FC BIT TEST (M8705) 
BITS 15-0 EXPT 177777 RECVD 177577 


THIS PRINTOUT SHOWS THAT FRAME COUNT BIT SEVEN (7) WAS 
NOT SET WHEN IT SHOULD HAVE BEEN. NO ITERATION NUMBER 
IS DISPLAYED WHEN RUNNING WITH CONSOLE SWITCH 

TWELVE (12) SET TO A ONE (1). 


LOG 
C 
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3. THE FOLLOWING IS A TYPICAL PRINTOUT RESULTING FROM BAD 
STATUS DETECTION DURING A MANUAL INTERVENTION TEST (LT14=LT1”) 


LOGIC_TEST 15: MANUAL STATUS TEST 2 
Tite ~~ EXPT 100700 RCVD 000700 


THIS SHOWS THAT ON THE FIRST TRY (ITER: 0) THE ACTION TAKEN 
SY THE OPERATOR DID NOT RESULT IN THE PROPER STATUS DETECTION 
BY THE HARDWARE (ATA IS NOT SET). 


THE FOLLOWING FOUR (4) EXAMPLES SHOW EACH OF THE ERROR : seas THAT 
CAN BE DETECTED BY ANY OF THE ERROR FORCING TESTS. NOTE THAT ONE OR 
MORE OF THE ERROR TYPES COULD BE DETECTED ON A SINGLE EXECUTION OF 
THE TEST. 

LOGIC TEST 24: ong =— RH) 

as at! wat vebn res 

004260 690000 033726 000000 600100 910600 660000 590000 137712 440300 

THIS MESSAGE SHOWS THAT DPAR (BIT 5 OF ER) DID NOT SET. 


LOGIC TEST 26: FCE <M8909) 
ERR NOT SET 


CS1 WC BA FC CS2 DS ER AS MR TC 

004260 000000 001376 000000 000100 110600 001000 000001 000000 100300 
THIS MESSAGE SHOWS THAT WHILE FCE (BIT 9 OF ER) WAS INDEED 
SET, THE COMPOSITE ERROR BIT (BIT 14 OF DS) WAS NOT. 

LOGIC TEST 30: DTE — RH) 

lle a — BIT 

$1 CS2 DS ER AS MR TC 
124260 602006 606600 660000 061300 150600 030000 000001 000017 100300 


THIS MESSAGE SHOWS THAT WHILE THE PROPER ERROR BIT (DTE: BIT 12 OF ER) IS 
SET, OPI (BIT 13 OF ER) IS ALSO SET AND SHOULD NOT BE. 


LOGIC TEST 32: UNS (M8909) 
NOT RESET BY DRIVE CLEAR 


CS$1 WC BA FC CS2 DS ER AS MR TC 
144210 002006 006600 000000 001300 150000 040000 000001 00C000 140307 


THIS MESSAGE SHOWS THAT WHILE THE PROPER — BITS WERE SET, THEY 
WERE NOT CLEARED BY A DRIVE CLEAR OPERATION 
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OPERATION 


THE PROCEDURES FOR OPERATING THIS PROGRAM ARE QUITE 
SIMPLE AND REQUIRE ONLY A FEW STEPS: 


1. LOAD ADDRESS 200 OR 210 
es SET ag hing FOR DESIRED TEST CYCLE 
3. PRESS STAR 


ALL CONSOLE eS ae ARE DYNAMIC AND MAY BE CHANGED 

AT ANY TIME. THE NORMAL OPERATING SEQUENCE IS ALL SWITCHES 
- _THE TEST WILL TAKE APPROXIMATELY 3 MINUTES TO 

RUN; HOWEVER, IF ITERATIONS ARE INHIBITED rahe - THE TEST 

WILL RUN IN ABOUT 30 SECONDS. THE END OF PASS I 

oar" ones PRINTOUT STATING END OF PASS, AND THE NUMBER OF 

H 


SINGLE TEST SELECTION: (SwO-SW5) 


WHEN SWO-SWS ARE SET TO ZERO (00), THE SCHEDULAR WILL 
EXECUTE ALL TESTS IN SEQUENCE. IF SWO-SW5 ARE SET 

TO SOME SPECIFIC TEST NUMBER THEN THAT PARTICULAR TEST 

ONLY WILL BE EXECUTED UNTIL THE TEST SELECT NUMBER IS CHANGED. 

WHEN YOU WISH TO SELECT A PARTICULAR TEST, SET SW10 TO 

A ONE (1) IN ORDER TO STOP AT THE END OF THE CURRENT TEST BEFORE 
SELECTING A DIFFERENT TEST NUMBER. YOU MAY SELECT THAT NUMBER IN 
ANY DIRECTION (HIGHER OR LOWER) BECAUSE EACH TEST IS SELF CONTAINED. 
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SUB TEST SUMMARIES 


LOGIC TEST w3 DRIVE ADDRESSING 


PURPOSE: VERIFY THE PRESENCE OF TMO3 AT THE ADDRESSES 
er etricn BY THE OPERATOR. TEST OCCURS IMMEDIATELY AFTER DRIVE 


PROGRAMMED SEQUENCE : 4+ EACH TMO3 ADDRESS (0-7) THE C1 
REGISTER IS READ, AND THE NON-EXISTANT DRIVE (NED) BIT 

IS CHECKED. NED IS SET WHEN THE TMO3 DOES NOT RESPOND TO 
DEM BY ISSUING TRA. IN THIS TEST, NED IS EXPECTED FOR 
EACH ADDRESS NOT TYPED BY THE OPERATOR. 


LIKELY FAULT LOCATIONS: M5904, CABLE .M5903 M8909 


CIRCUITS PRINT REFERENCES 


RH-DS BITS 

RH=-NED BIT 

MASSBUS CABLE C(DEM,TRA,DS BITS) 
DRIVE ADDRESS 

DEM-TRA HANDSHAKE 


LOGIC TEST #2: REGISTER ADDRESSING 


PURPOSE: CHECK THE REGISTER SELECT LINES 


PROGRAMMED SEQUENCE: READ ALL 14 MASSBUS REGISTERS WHICH MAKE UP 
is et CHECKING FOR (1) CONTROL BUS PARITY ERROR AND 


LIKELY FAULT LOCATIONS: M5904, CABLE .M5903 M8909 ,M8905~YB ,M8933 
PRINT REFERENCE 


C=LINES 

RH REGISTER SELECT 

TMO3 REGISTER SELEC 

MASSBUS REGISTER SELECT LINES 

PARITY TREE MB 
CPAR,ILR BITS (MB111) 


LOGIC TEST #3: CONTROL BUS 


PURPOSE: VERIFY THAT ALL CONTROL LINES PROPERLY TRANSMIT 
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ONES AND ZEROS. 


PROGRAMMED SEQUENCE: WRITE FC REGISTER gf CHE CK oy READ FC AND 
CHECK MCPE, UPDATE DATA, REPEAT. DATA IS ALL O'S ¥ "1° BIT, 
ALL ‘O'S, 2 WALKING '1" BITS BEGINNING WITH BIT 6 AND 

DATA IS CHECKED ALONG WITH ERROR BITS. 


LIKELY FAULT LOCATIONS: M5904, CABLES ,MS5903YA,M8909 ,M8905-YB M8933 


PRINT REFERENCE 


C=LINES (MB1 

C-BUS MULTIPLEXERS 24.5.8) (TCCM7) (MR) 
ERROR BIT 111) 

MCPE BIT (PACA) 


LOGIC TEST #4: SLAVE ADDRESSING 


PURPOSE: VERIFY THE FUNCTIONING OF THE SLAVE ADDRESS BITS IN 
THE TAPE CONTROL REGISTER THE SLAVE ADDRESS BUS LINES. 

THE ADDRESS DECODE CIRCUIT IN THE TE16 AND THE SPR BIT. 
RRR EKKEEEKEEKEKEKK 

*1T IS REQUIRED THAT ONLY ONE SLAVE BE POWERED UP WHENs 

*THIS TEST IS RUN. 


nts as 4S Re. SES RE OO RT OE 


PROGRAMMED SEQUENCE: THE SLAVE ADDRFSS BITS IN THE TAPE 
CONTROL REGISTER ARE LOADED WITH ALL 8 COMBINATIONS AND 
SPR IS CHECKED FOR EACH ADDRESS. 


LIKELY FAULTS LOCATIONS: M8905~-YB M8937, CABLE ,M9001 ,M8910 ,M9001 YA M8933 
PRINT REFERENCE 


REGISTER SELECT 
SLAVE ADDRESS BITS (MR6) 
SLAVE ADDRESS LINES ye of 2272), (LAW6) 


TE16 ADDRESS DECODE 
SPR BIT (LAW6) (M9001YA) (TCCM7) 
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LOGIC TEST #5: MAINTENANCE REGISTER BITS 


PURPOSE: TO VERIFY THAT THE VARIOUS BITS OF THE MAINTENANCE 
aa dpkciCo BE WRITTEN INTO AND READ AND OTHERWISE BEHAVE 


PROGRAMMED SEQUENCE: IN MTG fog SEQUENCE AN INCREMENTING DATA 
WORD (0-37) IS WRITTEN I THE MR. WITH THE CONTENTS OF BITS 0-4 
BEING CHECKED AFTER EACH OPERATION: THEN _15(OCTAL) IS WRITTEN 


TROL BUS. THEN THE DATA WRITTEN INTO BITS 7-15 
IS INCREMENTED AND CHECKED. 


LIKELY FAULT LOCATIONS: M8905-YB 


’ 
C 


PRINT REFERENCE 


C=LINES 

MAINTENANCE REGISTER 
M.R. FUNCTION DECODE 
M.R. MULTIPLEXOR 


PURPOSE: TO VERIFY THAT TAPE CONTROL BITS eth CAN BE WRITTEN 


INTO AND READ AND THAT TCW BEHAVES AS EXPECTED: 

Sarg SEQUENCE: ALL 0°S DATA PATTERN IS WRITTEN TO AND 
AD FROM THE TAPE CONTROL REGISTER. TCW IS CHECKED FOR A 

"ONE ‘ THis. gates IS REPEATED WITH ALL ‘"I'' DATA AND AGAIN 


LIKELY FAULT LOCATIONS: M8909,M8905~-YB 


PRINT REFERENCE 


TMO3 REGISTER SELECT (MBI2 
TC FLIP-FLOPS, MULTIPLEXERS (MR6) 
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LOGIC TEST #7: FRAME COUNT BIT TEST 


POSE: TO VERIFY THAT THE FRAME COUNT BITS CAN BE 
TE AND READ FROM AND ARE NEITHER STUCK AT 0 NOR 


PROGRAMME D ie es DATA is hth INTO THE FRAME COUNT 
REGISTER AND READ FROM IT. THE DATA PATT oon IS ALL ZEROS 
FOLLOWED BY ALL ONES FOLLOWED BY ALL ZEROS 


LIKELY FAULT LOCATIONS: M8909 
PRINT REFERENCE 


ae REGISTER SELECT 
FRAME COUNT REGISTER (MB18) 
FRAME COUNT MULTIPLEXERS (MB110) 


LOGIC TEST #10: FUNCTION CODE BIT TEST 


PURPOSE: TO VERIFY THAT THE FUNCTION CODE BITS CAN BE WRITTEN 
pede AND READ FROM AND ARE NEITHER STUCK AT 0 NOR STUCK 


PROGRAMMED SEQUENCE: THE C1 REGISTER IS WRITTEN WITH ALL ZEROS. 
DATA IS CHECKED ON THE 5 FUNCTION CODE BITS (BITS 1-5). 
ty Br Be E WRITTEN WITH ONES, CHECK AND REPEAT WITH 


LIKELY FAULT LOCATION: M8909, M8905-YB 
PRINT REFERENCE 


TMO3 REGISTER SELECTION 
FUNCTION CODE FLOPS 
FUNCTION CODE MULTIPLEXERS 
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LOGIC TEST #11: GO BIT SET, RESET 


PURPOSE: TO VERIFY THAT THE GO BIT CAN BE SET IN A SIMULATED 
READ OPERATION AND CLEARED WITH AN INIT. 


SEQUENCE: INIT AND ay he THAT GO=0. SET UP A 


STER TO 
FORMAT) INTO THE TAPE CONTROL REGISTER, 
AD COMMAND AND GO BIT. CHECK FOR GO=1. INIT AND 
CHECK THAT GO BIT=0. 


LIKELY FAULT LOCATION: MASSBUS CABLE B(INIT) ,M8909,M8905-YB 


PRINT REFERENCE 


GO BIT 
GO BIT MULTIPLEXER 
SET ILR 


LOGIC TEST #12: DRIVE READY BIT 
TEST 12 IS AN EXACT REPEAT OF TEST 11 EXCEPT 
THAT DRIVE READY (DRY) 1S CHECKED INSTEAD OF 
THE GO BIT. DRY IS SIMPLY GO L MULTIPLEXED ONTO 
THE C-LINES AS BIT SEVEN OF THE STATUS REGISTER. 


PRINT REF TCCM7 
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LOGIC TEST #13: INTERRUPT TEST 


PURPOSE: TO VERIFY THE OPERATION OF THE RH INTERRUPT LOGIC. 


PROGRAMMED SEQUENCE: THE C1 REGISTER IS CLEARED, PRIORITY IS SET, 


THE INTERRUPT ENABLE BIT IS SET AND THE INTERRUPT IS AWAITED. 
LIKELY FAULT LOCATION: 


PRINT REFERENCE 


INTERRUPT CONTROL 
MANUAL. INTERVENTION TESTS 14,15,16,17 


LOGIC TEST #14: STATUS AT BOT, ON LINE, LOADED, NO WRITE RING 


PURPOSE: TO TEST FOR THE PRESENCE OF MOL,WRL,DPR,DRY,BOT. 
PROGRAMMED SEQUENCE: THE OPERATOR IS INSTRUCTED TO LOAD THE 
DRIVE WITH A TAPE MINUS THE WRITE ENARLE RING AND PLACE 

THE DRIVE ON LINE AT BOT MOL,WRL,DPR,DRY ROT ARE CHECKED. 


LIKELY FAULT LOCATION: M8910,SLAVE CABLE, M8933 
PRINT REFERENCE 


LAW6, TCCM7 M8908 ,M9001YA, YC 
Se he Sere Aree re 


TCCM7 
LAW6,TCCM7 ,.M8908YA,M8913,YA 


SEQ 0014 
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LOGIC TEST #15: STATUS AT BOT,OFFLINE,LOADED, NO WRITE RING 
PURPOSE: TO TEST ATA,DPR,DRY,SSC 

PROGRAMMED SEQUENCE: OPERATOR IS — TO TAKE DRIVE 
OFFLINE: ATA,SSC,DPR,DRY ARE CHECKED 

LIKELY FAULT LOCATION: M8910,M8933,M8909,SLAVE CABLE 


PRINT REFERENCE 


LAW8 .M8913,M8913YA,TCCM7 
MBI3 


LOGIC TEST #16: STATUS AT EOT,ON LINE, LOADED, NO WRITE RING 


PURPOSE: TO TEST EOT,SSC,SLA 

PROGRAMMED SEQUENCE: THE OPERATOR IS INSTRUCTED TO MOVE TO EOT 
AND PLACE THE DRIVE ON LINE. EOT,SSC,SLA ARE CHECKED IN 
ADDITION TO ATA,MOL,WEL,DPR,DRY 


LIKELY FAULT LOCATION: M8910,SLAVE CABLE ,M8933 
PRINT REFERENCE 


LAW8 ,M8913,M8913YA,TCCM7 
LAW6, TCCM7,M8908YA ,M8913YA 
LAW8, TCCM7,M9001YA, YC M8908 
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LOGIC TEST #17: STATUS AT ONLINE LOADED 


TEST 17 IS EXACTLY LIKE TEST 16 EXCEPT THAT THE DRIVE IS 
REVERSED OFF OF EOT AND THE WRITE ENABLE RING IS INSTALLED. 


ARREARS RSAALAAASL LARA ASE SALAS AAA A LAS ASA SALAS SS 


EACH OF THE NEXT 11 TESTS ARE DESIGNED TO VERIFY 
THE ABILITY TO SET SPECIFIC ERROR BITS. 


ASRS SLAASLARARASLAAALAS ALAA AAAS ESSA ALES ESSE SS Sf 


LOGIC TEST #20: ILLEGAL FUNCTION 


PROGRAMMED SEQUENCE: THE WORD COUNT IS SET TO -1. ALL CODES 
STORED IN THE ILLEGAL FUNCTION TABLE ARE LOADED AND ILF IS 
CHECKED FOR EACH ONE. THEN UNEXPECTED ERRORS ARE CHECKED. 


LIKELY FAULT LOCATION: M8909 
PRINT acillntinati 


SET ILF DECODE ashe ,MBI7 
ILF FLOP MBI 1 
ILF MULTIPLEXER mB110 
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LOGIC TEST #21: REGISTER MODIFICATION REFUSED 

PROGRAMMED SEQUENCE: INIT, SELECT SLAVE AND DRIVE. LOAD 300 

@ TAPE CONTROL REGISTER LOAD WAM3_IN THE MAINTENANCE 

REGISTER. LOAD THE 3. REGISTER WITH A READ COMMAND AND GO 

BIT. ATTEMPT TO WRITE THE FRAME COUNT REGISTER. READ 

ERROR REGISTER. CHECKING FOR RMR. CHECK FOR UNEXPECTED ERRORS 
WAIT FOR ACCL. DELAY. DO EOP CLEAR. 


LIKELY FAULT LOCATION: M8909 
PRINT REFERENCE 


RMR DECODE 
RMR FLOP 
RMR MULTIPLEXER 


PROGRAMMED SEQUENCE: WRITE 20(8) INTO CS2. ENABLING THE 
WRITING OF EVEN PARITY ON MASSBUS. WRITE ALL ONES TO 

FRAME COUNT. RESET PAT. CHECK ERROR REGISTER FOR CPAR CHECK 
FOR OTHER UNEXPECTED ERRORS. 


LIKELY FAULT LOCATIONS: M8909 


PRINT REFERENCE 


MASSBUS PARITY TREE 
CPAR FLOP 
CPAR MULTIPLEXER 
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LOGIC TEST #23: FORMAT ERROR (FMT) 


PROGRAMMED SEQUENCE: AN ILLEGAL FORMAT CODE IS ag INTO 
THE TAPE CONTROL Ta Boal WAMS IS LOADED INTO THE MR 

READ COMMAND AND THE GO BIT IS SET. THE ERROR 

REGISTER IS CHECKED FOR FORMAT ERROR AND UNEXPECTED ERROR 
BITS. THIS SEQUENCE IS REPEATED FOR ALL ILLEGAL FORMAT CODES 


LIKELY FAULT LOCATIONS: M8905-YB,M8906 ,.M8909 
PRINT REFERENCE 
FORMAT BITS 
ILF roo 
ILF FLOP 
ILF MULTIPLEXERS 
LOGIC TEST #24: DATA BUS PARITY ERROR (DPAR) 
PROGRAMMED SEQUENCE: SET UP A WRAP 2 AS FOLLOWS: 
NORMAL FORMAT =----> TAPE CONTROL REGISTER, -10 ---=-> WORD 
2 720 ==-=> ey COUNT, WAM2 ----> MAINTENANCE RE- 
LOAD WRITE COMMAND AND GO BIT. SET PAT BIT IN 
-__AFTER A DELAY MR IS LOADED 4 TIMES CAUSING 2 DATA 
BUS TRANSFERS. DPAR AND CPAR ARE CHECKED. THEN A CHECK 
FOR UNEXPECTED ERRORS IS MADE MASKING OPI. 


LIKELY FAULT LOCATIONS: DBUS LINES, M8905-YB, M8906 


PRINT REFERENCE 


MM CLK 
WRT “ry GENERATION 
DPAR FLOP 

DATA BUS PARITY TREE 
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LOGIC TEST #25: NON-EXECUTABLE FUNCTION (NEF) 

PROGRAMMED SEQUENCE: LOAD FC WITH -1. SET WAM 2. SET 
WRITE AND GO. ILF SHOULD SET DUE TO TCO SMALL INITIAL 
FRAME COUNT. CHECK ILF. CHECK FOR UNEXPECTED ERRORS. 


LIKELY FAULT LOCATION: M8909 


PRINT REFERENCE 


NEF FLOP 
NEF MULTIPLEXER 
SET NEF 


LOGIC TEST #26: FRAME COUNT ERROR 


PROGRAMMED SEQUENCE: SET wC TO -10, FC TO -20 WAM3 IN 
MAINTENANCE REGISTER, LOAD WRITE AND GO, DELAY ISSUE MM OR 
CLEAR. CHECK FCE AND CHECK FOR UNEXPECTED ERRORS. FRAME 
COUNT ERROR SHOULD BE SET BECAUSE A WRITE OPERATION WAS 
TERMINATED PRIOR TO A WORD COUNT OVERFLOW. 


LIKELY FAULT LOCATIONS: M8909, MB CABLE, M8933, M8905-YB 


PRINT REFERENCE 


ON DECODE 
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LOGIC TEST #27: ILLEGAL REGISTER 


PROGRAMMED SEQUENCE: _IF THE ~ na ALL MASSBUS REGISTER 
OPEN (MOST SYSTEM IN THE FIELD DON'T), ALL THE ILLEGAL 
inter ARE READ, CHECKING THE ILR BIT AFTER 


LIKELY FAULT LOCATIONS: MASSBUSS, M8909 
PRINT REFERENCE 


REGISTER SELECT LINES 
REGISTER SELECT DECODE 
ILR FLOP 


LOGIC TEST #30: DRIVE TIMING ERROR 


THE MAINTENANCE REGISTER IS _ WITH A FUNCTION THAT 
1S DESIGNED TO CRIPPLE OCCUPIED. FRAME COUNT REGISTER IS 
CLEARED TO SET FCS LOAD WRITE COMMAND AND GO BIT. CHECK 
THEN DRIVE IS INITIALIZED. T 
3 CODE IS LOADED INTO MR. WRITE COMMAND ne GO BIT ARE 
AFTER DELAY FOR ACCELERATION, THE MR CLOCK IS GENERATED 
Fi FINAL CHECK IS MADE 
OPI. THE FIRST MAINTENANCE REGISTER 
CODE WHICH CRIPPLES THE OCCUPIED RECEIVER CAUSES tg 
TO BE ASSERTED AND TESTS THE CIRCUITRY WHICH CHECKS FOR 
OCCUPIED WHEN A DATA TRANSFER COMMAND IS INITIATED. THE 
SECOND TEST UTILIZES THE FACT THAT THE WRP 3 CODE INHIBITS 
THE MASSBUS WCLK RECEIVER CREATING A SITUATION WHERE SCLK 
IS NOT FOLLOWED BY A WRITE CLOCK. 


LIKELY FAULT LOCATIONS: M8909, M8905-YB, M8906, MB CABLES 


CIRCUITS PRINT REFERENCES 


DTE FLOP 

ae OCCUPIED FUNCTION 
WRP 3 FUNCTION 

ele tie oe CHE CK 


CHECK F 
MM CLK 
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LOGIC TEST 31: OPERATION INCOMPLETE (OPI) 


SET UP INCLUDES FORMAT, WRP 2 (BIT FIDDLER WRITE), FCS. 

rod TE COMMAND AND GO BIT ARE SET AND THE tee BELAYS 
FOR OPI. A SECOND TEST INVOLVES SETTING UP WRP 3 AND 

Dyes A_ READ COMMAND. ESSENTIALLY THIS TEST UTILIZES 
THE WRAPAROUND CODES TO PREVENT ANY SP BEING DETECTED 

AFTER A READ OR A WRITE COMMAND IS ISSUED. 


LIKFLY FAULT LOCATIONS: M8933, M8909 


PRINT REFERENCES 


OPI TIMER 
OPI FLOP 
OPI TIMER CONTROL 


LOGIC TEST 32: UNSAFE (UNS) 


A NON-EXISTANT SLAVE IS SELECTED AND A READ COMMAND IS ISSUED. 
UNSAFE ERROR IS CHECKED. IF THE DRIVE TYPE REG INDICATES A Tu?7 
THEN NON-EXECUTABLE FUNCTION (NEF) IS ALSO CHECKED. 


LIKELY FAULT LOCATIONS: M8909, M8910, SLAVE CABLE 


PRINT REFERENCES 


UNSAFE FLOP 
SET UNSAFE 
MOL GENERATION 
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) 
LOGIC TEST 33: POSITIONING IN PROGRESS (PIP) 


SET UP DRIVE AND SLAVE ARE SELECTED, FCS IS SET. A SPACE 
COMMAND IS ISSUED AND PIP IS CHECKED. 


LIKELY FAULT LOCATIONS: M8909, M8933 


CIRCUITS PRINT REFERENCES 
SPACE ake ites DE CODE MBI5 

PIP GENERATION TCCM7 

STATUS REGISTER TCCM7 


LOGIC TEST 34: PHASE-ENCODED STATUS (PES) 


DENSITY CODES 0 — 4 ARE LOADED AND PES IS CHECKED FOR EACH 
CODE. IT IS EXPECTED ONLY FOR DENSITY 4. 


LIKELY FAULT LOCATIONS: M8905~-YB, SLAVE BUS, M8931, M8933 


CIRCUITS PRINT REFERENCES 
DENSITY BITS MR6 
DENSITY LINES SBC 
PES CIRCUIT sc3 


PES STATUS BIT TCCM7 


SEQ 0022 
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LOGIC TEST 35: TAPE CONTROL WRITE (TCW) 


PROGRAMMED SEQUENCE : 


SETUP FORMAT AND WRP-3 ARE SET, READ COMMAND IS ISSUED. 
TCw IS CHECKED. DRIVE IS INITIALIZED, TAPE CONTROL REG- 
ISTER IS WRITTEN TO AND TCW IS CHECKED. 


LIKELY FAULT LOCATION: M8905-YB 


PRINT REFERENCES 


LOGIC TEST 36: FRAME COUNTER STATUS (FCS) 


DRIVE IS INITIALIZED, FCS IS CHECKED, DRIVE IS INITIALIZED, 
FRAME COUNTER IS WRITTEN TO, AND FCS IS CHECKED. 


LIKELY FAULT LOCATIONS: M8909, M8933 


PRINT REFERENCES 


S BIT 
FCS MULTIPLEXER 
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LOGIC TEST 37: ACCELERATION (ACCL) 


PROGRAMMED SEQUENCE : 


lls IS INITIALIZED, FORMAT IS SET AND ACCL IS CHECKED 
3 CODE IS LOADED, READ COMMAND IS ISSUED. 
AFTER A DELAY ACCL IS CHECKED FOR ZERO. 


LIKELY FAULT LOCATIONS: M8933, M8931 


CIRCUITS PRINT REFERENCES 


ACCL BIT, MOTION DELAY COUNTER TCCMS 
CLOCK SC2 


LOGIC TEST 40: PE TAPE MARK (TM) 


PROGRAMMED SEQUENCE : 


DRIVE IS INITIALIZED, WAMO IS SET, WRITE TAPE MARK IS SET. 
AFTER DELAY TAPE MARK BIT IS CHECKED. WAMO MULTIPLEXES 
THE OUTPUT OF THE WRITE DATA GENERATOR ONTO THE RDA LINES. 
THE DATA SYNC MODULES SYNC ON THE DATA AND SEND ENVELOPE 
INFORMATION TO THE TAPE MARK DETECTOR ON M8932. 


LIKELY FAULT LOCATIONS: M8932, M8901, M8933, M8905-YB 


CIRCUITS PRINT REFERENCES 


TAPE MARK DETECTOR 

TAPE MARK MULTIPLEXER 

ENVELOPE SIGNALS 

WRITE DATA BUFFER 

RDA MULTIPLEXERS 

WRITE TAPE MARK FUNCTION 
IGNAL 
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LOGIC TEST 41: NRZ TAPE MARK (TM VPE, ITM) 


SS ee 


PROGRAMMED SEQUENCE : 


C 
C 


SAME AS TEST 40 EXCEPT NRZ DENSITY IS SELECTED. 
LIKELY FAULT LOCATIONS: M8933, M8934 


PRINT REFERENCES 


WRITE DATA BUFFER 
RSDO MULTIPLEXER 

RDA MULTIPLEXERS 

™ DETECTOR 

ILLEGAL TAPE MARK FLOP 





N 2 
CZTEABO TMO3-TE16/TU77 CTL I MACY11 30A(1052) 21-DEC-78 13:08 PAGE 26 
CZTEAB.P11 15-NOV-78 13:10 SEQ 0026 


THE NEXT 5 TESTS CONSISTS OF WRITING ON TAPE USING MAIN- 
TENANCE MODE FUNCTIONS TO FORCE ERROR CONDITIONS TO Ho 
Stee cetects. consti cain Pe RORS MA 


UCT OF EMS 
PROBLEMS WITH THE DRIVE. DEBUG OF THE PR 
EASIER USING DATA RELIABILITY OF UTILITY DRIVER. 


LOGIC TEST 42: CYCLIC REDUNDANCY ERROR 


PROGRAMMED SEQUENCE : 


FIRST THE DIAGNOSTIC PERFORMS A WRAPO DESIGNED TO LOAD 

t-¥~ CRC By *. A KNOWN MANNER. CHECK ARE MADE FOR 
CE HE CONTENT OF “ red gpg” THEN A WRITE 

OPERATION is. PER (IJ 


FORMED USING A MAINT. MODE cc 
INHIBITS THE INITIALIZATION OF THE CRC CHECKER. 


C OR. TED ERROR BITS MAY INDICATE PROBLEMS 
WITH THE WRITE OPERATION. 


LIKELY FAULT LOCATIONS: §8905-¥B, M8934, GO56, SLAVE CABLE, 


PRINT REFERENCES 


MM FUNCTION DECODE 
CRC CHECK CIRCUIT 


LOGIC TEST 43: LRC 


A WRITE OPERATION IS: PERFORMED at A_MM FUNCTION (INC TMRL) 
WHICH ASSERTS WD(SB) 5L_ THROUGHOUT THE RECORD. ALL ONES 
DATA IS USED SO THAT THE FUNCTION ONLY INTERFERES WITH 

THE WRITING OF THE LRC CHARACTER WHEN NONE OF THE TMO3 
WRITE DATA LINES SHOULD BE ASSERTED. 

** NOTE: THIS TEST IS NOT PERFORMED ON A TU77 SLAVE. 


LIKELY FAULT LOCATIONS: M8505, M8933, M8910, M8934 
PRINT REFERENCES 


MM FUNCTION :DECODE 
WRITE LINE DRIVERS 
WRITE HEAD. DRIVERS 
LRC CHECKING 
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ny ai 
P11 


LOGIC TEST 44: PE CORRECTABLE DATA 


A PE WRITE OPERATION IS PERFORMED USING A FUNCTION WHICH 
WILL_GROUND THE BIT STROBE LINE ON BIT 1. THIS SHOULD 
CAUSE THE BIT1 DEAD TRACK FLOP_TO ASSERT AND CAUSE COR- 
fon eit ~— ERROR. THE DEAD TRACK REGISTER IS CHECKED 


LIKELY FAULT LOCATIONS: M8905-YB, M8901, M8932 


CIRCUITS PRINT REFERENCES 
MM FUNTION DECODE MRS 

BIT STrOBE CIRCUIT DS4 

DEAD TRACK FLOP DS5, TCPE2 
DEAD TRACK REGISTER MR4 


LOGIC TEST 45: PE INCORRECTABLE DATA 


REPEAT OF TEST 44, EXCEPT THAT THE MAINT. MODE FUNCTION 
GROUNDS BITS STROBE FOR BITS 1, 2 AND THE WD LINE FOR BIT 
5 IN HELD ASSERTED. INC. DATA AND PCF ERRORS ARE EXPECTED. 


LIKELY FAULT LOCATIONS: M8932, M890i 


CIRCUIT PRINT REFERENCE 


INC ERROR, PEF, TCPE2 


SEQ 0027 


an 
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LOGIC TEST 46: PE FORMAT 

THE MM FUNCTION USED IN THIS TEST INVERTS THE DATA USED 
IN PREAMBLE AND POSTAMBLE OF BIT ONE. 

LIKELY FAULT LOCATIONS: M8932, M8933, M8905-YB 


PRINT REFERENCES 


PEF. 
WRITE BUFFER 
MM DECODE 


LOGIC TEST 47: FRAME COUNT OVERFLOW 

THIS TEST USES A WRAP2 TO CHECK THE OVERFLOW OF FRAME 
COUNT REGISTER. 

LIKELY FAULT LOCATION: M8909 


FRAME COUNT REGISTER MBI8 


LOGIC TEST 50: NEF WHEN WRITING PE ON NRZ SELECTED SLAVE 


THIS TEST ENSURES THAT WHEN A SLAVE IS IN NRZ MODE A WRITE 
OPERATION WHEN OFF BOT IN PE MODE RESULTS IN A NON-EXECUTABLE 
FUNCTION AND SETS THE NEF BIT IN THE ERROR REGISTER. 


PROGRAM SEQUENCE : 


Lay: tre SLAVE IS REWOUND AND PLACED IN NRZ MODE AND SPACED 
OFF BOT. A PE WRITE -OPERATION IS INITIATED, AND THE NEF BIT 
IN THE ERROR REGISTER IS CHECKED. 


LOGIC TEST 51: NEF WHEN WRITING NRZ ON PE SELECTED SLAVE 


THIS TEST IS THE COMPLEMENT OF LOGIC TEST 50 ABOVE. 
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Co 
Ww 


LIST BIN,L 

~ TITLE CZTE FARO thO3-TE16/1U77 CTL I 
;CONTROL LOGIC TEST 

;AC-A791B-MC 


o 
4 
y 


J.G. ADAMS 
;REVISED MAY 1978 BY J. G. ADAMS ;++8 CHANGED MODULE REFERENCES TO 
3++B REFLECT _TMO3S MODULES 
;++B ADDED TU77 TEST CALABILITY 
REVISED NOV 1978 BY M. PAGE i+ De caret ENHANCEMENTS TO 
: THE ORIGINAL REV (DZTEAA) 


: NECESSARY FOR TMO3 
NON-STANDARD JUMPER MODE (SEE 4. 3 IN DOC.) 
-MCALL .$ACT11,.$EOP,$CATCH, $SAVE , SRESTORE ,SCHAIN, $CHNMOD 
eNLIST MC 
LIST ME 
-ENABLE ABS ,AMA 


— 8 2 8 2 et = I LL) 2) 3 
BRLKARANG LESSEE 


Mr 
SSSSs 
Wr 


ZCONSOLE SWITCHES**exxxxes 
*Sw15: \=HALT ON ERROR 
SW14: 


: TINUE 
;SW13: 1=D0 i PRINT ERRORS 
; O=PRINT ERRORS 

:SW12: O=HALT AT END OF PASS 

; 1=CONTINUOUS CYCLE 

;SW11: 1=INHIBIT ITERATIONS 

; 0=DO ITERATIONS 

7 SW10: ann — OF EACH TEST 

7SW9: 1=DO MANUAL INTERVENTION TESTS 

3 O=INHIBIT MANUAL INTERVENTION 
;SWO-5: SELECT TEST NUMBER :: OO=ALL TESTS 


URS 


Se 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


NOMONMNNNNNoNoNoNny 
| 
OOONOUSWN—O 
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3TE16 REGISTER BITSeeexxannnn 


315 314 313 312 311 510 ;09 ;08 ;07 ;06 ;05 ;04 ;03 ;02 ;01 ;00 ; 
#1008000 00000000000 RO GOO SOOT OA IG ORK ROO ITO IC OOOTIIK 
2SC : TRE; sMCP; SPR; s DNA; PSL; sA17; sA16; sRDY; IE = FUN; FUN; FUN; FUN; FUN; GO ; 


#201800000013000000015000300005000300010005000500050001000 500050005 


; COUNT : 
97 Reece mcepenremines compere 


. . 
° e 


: ADDRESS : 
1.7 Beene wpe amearepsomaaR omen 
> COUNT : 
= XIII II III III III ICICI ICICI III III III III ICI 
:DLT;WCE;UPE ;NED ; NEM; <PGESPXF :MDP:OR ; ZR ;CLR;PAT;BAI;U2 ;U1 ;U0 ; 


£3000680003 000500050005 0000 0000000000000 G0 OTONKIIOK 
3ATA; s ERR; sPIP; sMOL ; sWRL ; sEOT; a XXX; s DPR; sDRY; sSSC; sPES; s SDN; IDB; TMK; ;BOT; sSLA; 


WNW nmr 
WAS BooN 


BURAK 


#3xaxiooosogasovadoauriooocionossovadoa doa iooosionasocadoon sooo 
E; UNS; , OPI; sDTE; sNEF ; iCS FCE; eC PELEPE: FMT; CNT; SRR; ILR; ILF; 


C3 M: 
TS renermeomneeueoumeeneutcmnnemmene 


:_S : 
#9810190000000X1 XXIII 


* CHARACTER : 
ges soe ersa eperrreouemammemacony: 

> BUFFER : 
EXOTIC AIIADOKIIOT 
37:6:5:4:3:2:1:0: P SCLK:CLK: 4:3:2:1 :60: 
ESSTISSTOSCOOSOTOST ESE UOOLUSOTOSOTODEOTOTEOSEOSEEOSETOSTOSS OSE, 
‘ TYPE “CH: SPR: : 
ESSCOOSCOSETOLOSESOIOSECOTOCSEOOOTTODTOSEOOROEOOOOSTOO SEEDS TOOT 
#0000000 XXX 2022000000000 000 
SACL; FCS; SAC; ENA; SPR; DEN; DEN; DEN; FMT; FMT; FMT; FMT: EVN; SSN; SSN; SSN; 


=D 4: 4:2: " :P 
7100050000500 000100000000 000000000000 00000 G00 GOO GOO GOO 
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SREGISTER EQUIVS*eexxkxenn 


000007 
3ACT11 HOOK *&eaKke nee 
000764 $SVPC=. ;SAVE CURRENT LOCATION CTR 
000046 246 
oy $SENDAD SET LOCATION 46 


-WORD 0 SET LOCATION 52 = 0 
000764 . =$SVPC RESTORE LOCATION CTR 


TTY INTERRUPT VECTOR**xaaaenne 
000060 -=60 
017212 «WORD ITTINT ;TTY INTERRUPT HEADER ADDRESS 
000340 -WORD 340 PRIORITY LEVEL 7 


S SOFTWARE SWITCH REGISTER**exxxannne 
000176 ;USED IF HARDWARE SWR = 177777 OR NOT AVAILABLE 


=176 

000600 SWREG: “ WORD 0 ;SOFTWARE SWITCH REGISTER 

ZSTART ADDRESS**txeennee 
000200 .=200 
000137 001332 JMP START ;PROGRAM START 

SRESTART ADDRESS***axannee 

000210 -=210 
900137 002202 JMP ST2 

:TMO3 INTERRUPT VECTOR *kexennne 
006224 2226 


017202 MTINT TAPE INTERRUPT HANDLER ADDRESS 
000340 340 


RES SSSEIHIESS 


SS 


See 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
i 
1 
1 
1 
4 


—~.2 
=O 


AWG 
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= 
mmm 
& 


_* 


BRIM IRIKI eats 
NOUEWIR— DWNAULSWN—ODOONAUS wr 


.=510 
sMASS BUS REGISTER EQUIVS***xxxxane 


179472 iC: 179472 
ILLEGAL FUNCTION CODES 
005405 


ag 


ZS CONSTANTS eexttree 


177776 PROCESSOR STATUS 

SWITCH REGISTER 

TTY READER STATUS 

TTY READ BUFFER 

TTY PUNCH STATUS 

; TTY PUNCH BUFFER 

: ITERATION AMOUNT 
24 INTERRUPT VECTOR(RH) 
72440 STARTING REGISTER ADDRESS 


KKEKEEKE RE 
WU O00 NAURWU AOD 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
5 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
; 
1 


WNIWWNAIGW 
Mn 
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sFLAGS AND COUNTERS*®*taaaxnne 


a 


AO 
NRG 
a4 


wW 


RAR 


WANWWANW 
Wu 
won 


SERESERES 


CERRY 
CONAUSWN—O”O 


SRESaReSy 


WIAA AIA IAA AIW 
SPLSESSSSES 


S33 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


5 a 

ooo 

Wh 
 —lelelelelelelelelelelelslelelelelelalelelelelelelelelelelelelalelelelelelelelelelelelolelelelelelelelelele) 
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jelolelele) 


:+*B INDICATES SLAVE TYPE (0/1 = TE16/TU77) 
PASS COUNTER 
:+INDICATOR FOR NON-STANDARD CONFIG. 
;+FLAG FOR NON-STANDARD CONFIG. 


SEXPT WRAP STATUS eeennn 


OWOO!: OCCOO 


lol eleal a) 


CORE DUMP PATTERNS###«=xs 


5 
5 
12 
12 
0 

17 
17 
17 
17 
0 


001054 
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sLOGIC TEST ENTRY TABLE***xxxnnax 
TSTTBL: 


oo 
4444 


WDBNAUSWN—OO 
NON A 3 PP Rs SR SS SS BS SY WA OAUIUTES BWW OUP 


BRRARARRRRRARRS 
MMVIII SS 


SESERES 
sgsssgsegsgesesssss 
Oo 


SS SS SS SS SS SS SS YS SS 
ss SS SS Ss — 9 9 3) Ss ) 4) 


— =) sd SS — - -) ) S  S SY S ) 
PoP WWrNNN eS 

at a onl eee ad —s _— ae oe = 

en a 


Bes 
“4 


MININ = @ OO N NADINE &\ AUN = = OO 
4 


KRRVSARNSSEVS 
DONNAD AIS Sw 
coe ae — — be _ 
—_ =~ —_ ae | ~_ —_ 


NoNoNnoNnoNgoNoNgoNgNony @ a 


Nong a 
NOAA SNO 


L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 


AAA A A A HH tt tt St nw 


SSSSSSSSSSIVSSVE 


NN 
On 


917030 
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4 
32 


Lael 


NMAOFKSO 
bee ms va 
~~ + 


FAWN MOON NADINE BAN 


lelelelelelelelelelelelelelelelelelelele) 
eh ai ah anh and anh aah an anh an an and ad a cael en cn ee en en 
WW 
Ww 
Nm 


AN SSVSVAARWV SONA AR WA ODS IRAR 


PV AVWPV SV PVA A AVA AIAVA ATT IIT I IIIIIIIIIIT 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


WWW 


:CONTAINS # OF TESTS. 





3 
CZTEABO TMO3-TE16/TU77 CTL I MACY11 30A(1052) 21-DEC-78 13:08 PAGE 37 


CZTEAB.P11 —- 15=NOV-78 13:10 SEQ 0037 
1534 EVEN 
1335 ;PROGRAM START AND HOUSEKEEPING****#x«80« 
1537 :NOTE: PROGRAM STARTS HERE ON START AT 200 
1538 001332 012706 000500 START: MOV #500,SP :SET STACK POINTER 
1539 001336 013746 000004 MOV ays ,-(SP) ‘SAVE ERROR TRAP VECTOR 
1540 001342 013746 000006 MOV a6. -(SP) SAND VECTOR +2 
1541 001346 012737 001372 000004 MOV #1$,a44 ‘SET NEW VECTOR 
1542 001354 005037 000006 CLR SAND PSW 
1543 001360 022777 177777 177202 CMP #-1,aSWR SUSE SOFTWARE SWITCH IF HARDWARE 
1544 001366 001402 BEQ 2$ SIS = 177777 
1545 001370 000404 BR 3$ S OTHERWISE Use HARDWARE SwWR 
1546 001372 022626 1$: CMP (SP)+, (SP)+ “RESET STACK PTR 
1547 001374 012737 000176 000570 28: MOV ASWREG, SWR ZSET SOFTWARE SWITCH REGISTER 
1548 001402 012637 000006 3$: MOV (SP) +, a46 SRESTORE ERROR TRAP VECTORS 
1549 001406 012637 000004 MOV (SP) +, aA 
1550 001412 005037 001012 CLR SKAT ZCLEAR SKIP ADDRESS TEST FLAG 
1551 001416 005027 CLR PC) + 2: CLEAR CHAIN INDICATOR 
1552 001420 000000 CHNFLG: .WORD 0 : CHAIN MODE INDICATOR 
1553 71/0 = CHAIN/NOT CHAIN MODE 
1554 001422 005737 000042 TST ar42 ‘BRANCH IF IN DUMP MODE 
1555 001426 001407 BEQ 50$ 
1556 001430 012737 000176 000570 MOV ASWREG, SWR Z INVOKE SOFTWARE SWR 
1557 001436 005237 001420 INC CHNF LG ::SET CHNFLG = CHAIN MODE 
1558 001442 000137 001446 JMP SCHN *:GO TO CHAIN ADDRESS 
1559 001446 50S: 
1560 001446 000240 SCHN: NOP 
1561 001450 122737 000006 000041 4$: CMPB #6, #41 ;BRANCH IF NOT LOADED VIA TMDP 
1562 001456 001005 BNE 5$ 
1563 001460 012704 023364 MOV #MSG62 RS sADVISE USER TO REMOVE TMDP FROM 
1564 001464 004737 017662 JSR PC, TTOUT [UNIT UNDER TEST 
1565 001470 HALT 
1566 001472 012704 020600 S$: MOV #MSG1,R4 
1567 001476 004737 017662 JSR PC, TTOUT sPRINT TITLE 
1568 001502 005737 001420 TST CHNF LG SEE wif _IN CHAIN MODE 
1569 001506 001402 BEQ 6$ ‘IF NO 
1570 001510 000137 002222 JMP TSCD TELSE 60 TO START OF TESTS 
1571 001514 112737 000043 020600 6$: MOVB #'#,MSG1 [DO NOT PRINT TITLE ON RESTART 
1572 001522 012704 022541 MOV AMS644 RG 
1573 001526 004737 017662 JSR PC, TTOUT ;REQUEST REGISTER ADDRESS 
1574 001532 013703 000606 MOV REGS.R3 
1575 536 004737 020010 JSR PC,OCTP :PRINT CURRENT ADDRESS 
1576 001542 012705 000606 MOV #REGS RS [SET ADDRESS SAVE LOC 
1577 001546 012701 000007 MOV #7 [SET SIZE OF RESPONSE 
1578 001552 012702 176400 MOV 4176409, R2 SET LIM 
1579 001556 012703 172300 MOV #172300, R3 :SET LOWER LIMIT 
1580 001562 004737 017340 JSR PC,TT ‘GO GET RESPONSE 
1581 001566 012704 022563 MOV omGes RG 
1582 001572 004737 017662 JSR PC, TTOUT ;REQUEST VECTOR 
1583 001576 013703 000604 MOV VECT.R3 
1584 001602 004737 020010 JSR PC,OCTP :PRINT CURRENT VECTOR 
1585 001606 012705 000604 MOV #VECT,RS [SET ADDRESS SAVE LOC 
1586 001612 012701 000004 MOV #4,R1 :SET SIZE OF RESPONSE 
1587 001616 012702 000224 MOV #224 Re :SET UPPER LIMIT 
1588 001622 012703 000150 MOV #°50-R *SET LOWER LIMIT 
1589 001626 004737 017340 JSR PC,TIR ‘GO GET RESPONSE 
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1590 137 000604 VECT RO 3GET VECT 
1591 00 017202 WMTINT,(RO)+ ° 3LOAD INTERRUPT ADDRESS IN VECTOR 
1592 000340 #340, (RO) sl PRIORITY 
1593 1 013700 000606 REGS ,RO 7GET START OF REGS 
000016 #16,R1 :SET NUMBER OF REGS 
000510 #C1,R2 :GET START OF TABLE 
: MOV BUILD TABLE 
000002 #2,R0 :BUMP ADDRESS 
R1 41 IF DONE 
F NOT: BR 


N°] 
wi 


Baeeyy 


000610 
000077 
CLEAR FLAGS + COUNTERS 


ST1 
023174 s *REQUEST IF JUMPER IS IN NON-STANDARD MODE 


SESRSESses 


: LIME T RESPONSE 
ET CHAR. 


SPONSE 
{TEST FOR NON-STANDARD JUMPER. 


:GO TO MODIFY SCHEDLAR 
REQUEST TMO3 DRIVE #4 


+H 2 DRIVE # 

vie ROUTINE RETURNS USER VALUE TO (R5) 
. ;LIMIT RESPONSE 

[LIMIT RANGE TO 0-7 


GET USER_RESPONSE 
REQUEST TE16 SLAVE # 
GET CURRENT SLAVE # 
SAND PRINT IT 


TTR ROUTINE RETURNS RESPONSE TO (R5) 
[LIMIT RESONSE TO 1 CHARACTER 
;BETWEEN 0 AND 7 


GET USER RESPONSE 


REQUEST STATIC ONLY 
;GET CURRENT VALUE 
TYPE IT 


Zs AND 
#STATC,RS “SET ADDRESS OF STATIC FLAG 
pe SET SoPER LIMIY 
000000 #0.R3 “SET LOWER LIMIT 
017340 PC; TTR :GET RESPONSE 


023510 AMSG67 ,R4 : REQUEST SLAVE TYPE *TE16 OR TU77* 
017662 Pc, TTOUT $ 
001010 SLVTYP,R3 : GET CURRENT SLAVE TYPE 


AARAAAAOAO 
at ad al oh en aed cl ce aah ald 
WONAUSWN—O 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


BEERS 


itn dais Set fn oe Sn de oe ey 
—=334 dad ad od = 


2 


$2 
-=O—3 
Nm 
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PC,OCTP 3++B TYPE CURRENT VALUE 
#SLVTYP,RS 3++B GET ADDRESS OF SLVTYP FLAG 
#2,R1 :+4B SET SIZE OF RESPONSE 
#1,R ;++B SET UPPER LIMIT 

000000 #0,R 3++B SET LOWER LIMIT 

017340 PC,TTR :++B GET RESPONSE 


ENUSSESS | 


rs 


#500,SP SET STACK PTR 
001002 RDRVF CLEAR REVERSE FLAG 
001014 PCNTR :CLEAR PASS COUNTER 
0204 36 PC,GTSWR :GET SWITCHES 


T 
4 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


NOW 
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28 & 
Oo 


s TEST SCHEDULAR* te tteennn 
176342 : #100,@TKS :SET “pe vey A i orke ENABLE 
C WPGFL 7CL WRAP P, LAG 
CLEAR SINGLE Test. FLAG 


s;BRANCH IF SINGLE 
:TEST SELECTED 
001420 3 BRANCH IF NOT IN CHAIN MODE 


177777 000620 MO SM TTAL IGE rap | 4 

000660 : NITIALIZE SLAVE # 

176216 18: MO INIT CONTROLLER. 
DRVN SISTEP DRIVE # 

000620 MP EXIT IF ALL im TESTED 
SDONE 2eFOR AVAILABILITY 

176174 MO ° :sLOAD DRIVE # 
acl ZIACCESS DRIVE 

176162 | aati : ;BRANCH if DRIVE NON EXISTANT 


BN 

NXTSLV: SLVN STEP SLAVE # AND BRANCH 
BN 1$ HIF NOT SLAVE _0 

DRVN ; ;BRANCH IF NOT DRIVE # 0 


1$ 
000041 #o.ans) BRANCH IF NOT TMDP 
SLVN :iSTEP TO SLAVE # 
000660 1$: #10, SLVN ‘BRANCH IF ALL SLAVES TESTED 
*ZFOR AVAILABILITY 
176134 MOV SLYN. sr ;:LOAD SLAVE UNIT # 
176122 #2000, aDT SBRANCH IF SLAVE NOT 
NXTSLV ‘:PRESENT (SPR = 0) 
001056 : PISTIBL, LTADD 
000004 000736 ; #4,LTADD 


000736 : LTADD, ITRLP 
000002 #2,1TRLP 


ee ee De ed ed ed 


sasacaaas z 
SSE ESTES SES 


aon 
Bo 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


SESSSRERES 


SET ITERATION ADDRESS 
000614 : HDRF L SCLEAR PRINT HEADER FLAG 
176260 aL TADD RO :SET POINTER TO TEST 


002000 176102 : #2000, aSWR 7SEE IF HALT ON TEST 
TSCD3 ;1F NOT: BR 


000774 CLEAR WRAP DATA GENERATOR FLAG 
000734 : :SE be a TEST 


176060 MO 
177700 #195700, RO ;BRANCH Hi ALL TESTS DESIRED 


TScD 7 1F SO: 

000001 000734 : #1,STFLG SSET SINGLE TEST FLAG 

001330 TLAST RO 7SEE IF EXCEEDED TESTS 
os D SIF SO: BR 


RO 7SET TABLE MODIFIER 
001056 000736 MOV #;STTBL,LTADD 
000736 RO,LTADD ;SET TEST POINTER 


RRERC: 
N— 


SaCeoRs 


Ss 3 Ss YY 2 PP SS SY I OS SS 


NNNN 
a > ee ee 
Whoo 





om 


c 4 
TMO3-TE16/TU77 CTL I. MACY11 30A(1052) 21-DEC-78 13:08 PAGE 41 , 
P11: 15=NOV=78 13:10 | 


BR 
001420 TEND: s;BRANCH IF_IN CHAIN MODE 
BN :STEP TO NEXT SLAVE 
022401 SDONE : 
PRINT END OF PASS 


020010 OcTP PRINT PASS NUMBER 
RO DELAY WAITING FOR 


pe) 


DONAUSWN—OOONOUS 


BN 1$ 
000042 GET ACT11 RETURN ADDRESS 
. ERE sBRANCH IF NOT ACT11 


mr 


R 
SENDAD : PC, (RO) 
NOP 


NNNNNNN 
nin 


ere 


HERE: NOP 
001420 T CHNFLG BRANCH IF IN CHAIN MODE 


TENDX 
010000 175724 #10000 ,@SwR SEE IF HALT ON PASS 
TENDX ;IF NOT: BR 


Ww 
~N 


HA 
001012 V #1, SKAT SET SKIP ADDRESS TEST FLAG 
I PCNTR on a COUNTER 


JMP TSCD_. sREST. 
sLOGIC TEST 1: DRIVE ADDRESSING*#s*«xxxKxe 


#MSLT1,EMADDR  ;++8 SET ERROR MSG HDR ADDRESS 
DRVN, TEMP3 GET DRIVE # TO BE TESTED 


DRVN.R1 
SKAT : SEE IF SKIP ADDRESS TESTS 
STFLG [SEE IF SINGLE TEST 

“IF NOT: 


LT1X ; : 
175640 : #1000 ,aSWR BRANCH IF MAN INTERVENTION 
LT1A NOT SELECTED 


:PRINT TEST INSTRUCTIONS 


REQUEST DRIVE NUMBER 
TTR ROUTINE RETURNS RESPONSE TO (R5) 


7%4 
74 
7%4 
74 
7%4 


Wiss 


SSSS8S 
aad and aad ab Cd 
>| 


2 


;GET DRIVE NUMBER 
;SEE IF ANOTHER DRIVE 
;IF NOT: BR 

sSELECT DRIVE 0 

7SET NUMBER OF DRIVES 
INIT 

sSELECT DRIVE 

175460 TS ac sACCESS DRIVE 

010000 175462 #10000,aCS 4 ey NED 


101 BN t e O: BR 
032777 001000 175522 #1000 ,aSWR ;BRANCH IF NOT MANUAL INTERVENTION ’ 


338 


175500 LT1A: 
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Z 
Z 


T 
T 
i 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


mm 


C 
C 


LT1x 
000674 ;SEE IF SHOULD BE NED 
LT1C ;1F NOT: BR 
BR LT1E ;ELSE GO TO ERROR 
000674 LT1B: ;SEE IF SHOULD BE NED 


LT1C: 

3 IF DONE ALL: BR 
;SELECT NEXT DRIVE 
BR LT1A ; CONT INUE 
000712 LTI1ER: a 3FLAG EXPT 


000712 LT1ER1: FLAG NOT EXPT 
000666 LTIER2: FLAG CONDITION 
000706 MO #LT1A,SCOLP SET SCOPE ADDRESS 
015164 PC,LTGER :GO PRINT LOGIC TEST ERROR 
TIC ; CONTINUE TEST 


BR L :CO! 
002460 LT1X: TSCD2 RETURN TO SCHED 


CONAUSWN—O 


RPE SEDERSRERRRABS 
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CZTEAB.P11 —- 15=NOV=78 13:10 SEQ 0043 
789 SLCGIC TEST 2: REGISTER ADDRESSING* exeennens 
1791 003142 000240 LT2: NOP 
1792 003144 012777 0000460 175346 LT2IT: MOV #40,aCS INIT 
1793 003152 013777 000620 175340 MOV DRVN, acs ‘SELECT DRIVE 
1794 003160 012737 023704 000616 MOV WMSLT2,EMADDR SAVE [13* HEADER ADDRESS 
1795 003166 012705 000510 MOV #C1,R5 ‘SET ADDRESS OF FIRST REGISTER 
1796 003172 012700 000016 MOV #16.RO ‘SET NUMBER OF REGISTERS 
1797 003176 012702 000622 MOV #TROO,R2 SSET START OF REGISTER BUFFER 
1798 003202 011507 LT2A: MOV (R5),R1 
1799 003204 011112 MOV (R1) RR) :READ REGISTER 
1800 003206 032777 020000 175274 BIT #20000, act ‘SEE IF ERROR 
1801 003214 001402 BEQ [IF NOT: BR 
1802 003216 004737 003246 JSR bro LT2ER1 ‘ELSE GO TO ERROR 1 
1803 003222 032777 000002 175274 LT2B: BIT #o aeR ‘SEE IF ILR 
1804 003230 001402 BEQ LT2C [IF NOT: BR 
1805 003232 004737 003264 JSR PC, LT2ER2 TELSE GO TO ERROR 2 
1806 003236 022225 LT2c: CMP (Re)+, (R5)+ “BUMP ADDRESS 
1807 003240 DEC RO 
1808 003242 001357 BNE LT2A :CONTINUE FOR ALL REGISTERS 
1809 003244 000434 BR LTOX 
1811 003246 012737 000002 000712 LI2ER1: MOV #2,EXFL :FLAG NOT EXPECTED 
1812 003254 012737 021215 000666 MOV #MSG4, ERADD ‘POINT TO CONTROLLER ERROR 
1813 003262 000415 BR LT2ERG :GO TO ERROR 
1814 003264 012737 000002 000712 LT2ER2: MOV #2, EXFL ‘FLAG NOT EXPECTED 
1815 003272 012737 021233 000666 MOV #MSG5 ,ERADD [POINT TO DRIVE ERROR 
1816 003300 000406 BR LT2ER ¢ ‘GO TO ERROR 
1817 003302 012737 000001 000712 LT2ER3: MOV rite EXF [FLAG EXPECTED 
1818 003310 012737 021215 000666 MOV WMSG4., ERADD ‘POINT TO DRIVE 
1819 003316 012737 003332 000706 LT2ERG: MOV #LT2LP,SCOLP + SET iy ADDRESS 
1820 003324 004737 015164 JSR PC,LTGER PRIN 
1821 003330 000207 RTS PC “ELSE CONTINUE 
1822 003332 005726 LT2LP: TST (SP) + :RESET STACK 
1823 003334 000722 BR LT2A 
1824 003336 004737 016534 LT2x: JSR PC, ITER G0 SEE IF ITERATIONS 
1825 003342 000137 002460 MP TSCD2 SRETURN TO SCHED 
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1826 
1827 


RaSSs 


racial 


175104 
020000 


DWNAUKBWN—OOONAUSWN—OOON 


021546 
003366 
175044 
016272 
021522 
003406 
016272 


RELRLRELKK 


000401 
000010 
016534 
002460 


MMA AI 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
i 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


0 00 00 00 C0 Co 00 CO CO 


Al 
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sLOGIC TEST 3: CONTROL BUS***xaannne 


000616 AMSLT3,.EMADDR 
#1,R1 


#20,R0 
175120 


175070 


LT3A 
#MSG11,ERADD 
21% SCOLP 


PC TGER 
BB 


LT 
4MSG10,ERADD 
#LT3B,SCOLP 
rt LTGER1 


BR LT3C 
LT3X: R1 
BM LT3XX 

#401,R1 

#10,R0 


000666 
000706 


000666 


BR 
LT3ER2: 
000706 MO 


L 
PC, ITER 
TSCD2 


SET TEST HEADER 

;PRESET PATTERN 1 

:SET PATTERN CHANGE NUMBER 
GO INIT 


sWRITE TO FC 

;SEE IF CPAR (TMO3) 
;IF SO: BR 

sREAD FC 

sSEE IF MCPE (RH) 

; SO: BR 

;SEE IF DONE PATTERN CHANGES 
;1F SO: BR 

; CHANGE PATTERN 
: TINUE 


SET ERROR CODE 
SET SCOPE ADDRESS 
:GET DATA 

:GO DO ERROR 


;SET ERROR CODE 
SET SCOPE ADDRESS 
:GO DO ERROR 


;SEE IF DONE PATTERN 2 
;IF SO: BR 


SET PATTERN 2 

SET PATTERN CHANGE NUMBER 
;DO PATTERN 2 

:GO_ SEE IF ITERATIONS 
RETURN TO SCHEDULAR 





mn 


&§ 


a4 


oo 
Vv 


RR 
O° 


Seep Oko 


SN 


wr 


ee ee 
N 


SSeRe 
* 


— — —) 
S38 
OnNAWM 


8 


SPER RE RP RRR ttt des det et 


ed a el eld a ae ce ce od i a a ee ee ee i cl ec a eh ec eld eh cd a ee ed cee ed a cd a ad 
00000 


aah aad cot cod ee 
Swnr-oO 


TMO3=TE16/TU77 CT I 
11 1 78 


5-NOV= 


13:10 


000660 000674 LT4: 
000660 


001012 
000734 
001000 
021351 


00000 
023476 
142054 


023503 
142051 


023546 
017662 
002552 
022223 
017662 
174504 
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SLVN, TEMP3 
V SLVN.R1 
SKAT 
1$ 
TST STFLG 
LT4X 
BIT 4) ieee 
#MSGBA,RG 
PC, INST 
G8,R4 
PC, TTOUT 
ATEMP3,RS 
MOV #2,R1 
MOV #7.R2 
MOV #0, 
JSR PC-TIR 
ST TEMP1 
BEQ LT4X 
CLR R1 
V #10,RO0 
#40.acsS 
V DRVN, acs 
MOV R1,aTC 
MOV T.R3 
CMP R1, TEMP3 
14B 
BIT #2000,R3 
LT4D 
LT4ER1 
#2000,R3 
Q LT4ER2 
AMSG64 RS 
PC, TTOUT 
~R2 
#M5G65 RG 
#142054 .adT 
V #MSG66 .R4 
#142051,aDT 
1$ 
AMSG69,R4 
PC, TTOUT 
Re. SLVTY® 
IRSG68. R4 
PC, TTOUT 
TEND 
#MSG30,R4 


JSR Po, TTOUT 
MOV aSN,R3 


SEE IF SKIP ADDRESS TESTS 
7 IF NOT: BR 


LOGIC TEST 4: SLAVE ADDRESSING**xxxxane 


iSEE IF SINGLE TEST 
F NOT: 


“BRANCH IF MAN INTERVETION 


:NOT SELECTED 


;PRINT TEST INSTRUCTIONS 
REQUEST 


SLAVE 


GET SLAVE Ps pete 


SEE IF SLA 
:1F NOT: 


[SELECT SLAVE 0 
sSET NUMBER OF SLAVES 


SELECT DRIVE 
;SELECT SLAVE 
;GET DT 


:SEE IF SHOULD HAVE SPR 
O: BR 


Ss 
‘SEE IF SPR 
:1F NOT: BR 
:GO TO ER 


ROR 1 
:SEE_IF NO SLAVE PRESENT 
: (SPR=0) 


S 
[TYPE "SLAVE TYPE = 


:PRESET SLAVE TYPE = 
SET UP TO TYPE 


[BRANCH IF TU77 


CHANGE SLAVE TYPE TO ‘TE16" 
; CHANGE ns, rvs TO TE16 


BRANCH IF 


;CRHENGE SLAVE TYPE TO ILLEGAL 


: TYPE SLAVE Bios, (TU77,TE16, 
BRANCH IF HAR 


'Tu77" 


Om ALLEGAL) 


WARE SLAVE TYPE IS THE 


: SAME AS USER SPACIFIED SLAVE TYPE 


3++B TYPE 


3448 
i++B EXIT 
;PRINT SERIAL NUMBER TAG 


"INCORRECT SLAVE TYPE" 


TEST 


SEQ 0045 
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020334 
001000 


015164 
002460 
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J PC, SNPT :PRINT SERIAL NUMBER 
174522 #1000 aur ‘BRANCH IF NOT MANUAL INTERVENTION 


LT4D: 
:1F DONE ALL: BR 
;BUMP SLAVE 


BR LT4A ; CONT INUE 
000712 LT4ER1: ~ :FLAG EXPT: NOT RECEIVED 


000712 LIT4ER2: 2. EXFL FLAG RECVD: NOT EXPT 
000616 LT4ERG: SET LT4 HEADER 
000666 #MSG9,ERAD SET ERROR CONDITION 
000706 #LT4A,SCOLP SET SCOPE ADDRESS 
PC,LTGER :GO TO ERROR 
LT4D :1F NO SCOPE: BR 
TSCD2 RETURN TO SCHED 





Be 
Ww 


DOD0D0 
ae 


MUS Sat Sh ot ett er 


SERPS 


Stat 
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sLOGIC TEST 5: MAINTENANCE REGISTER BIT TEST****exnwne 


004132 012737 924132 000616 LT5: MOV #MSLTS,EMADDR SET TEST HEADER 
004140 004737 016662 LTSIT: JSR PC. INIT1 *GO INIT 
004144 012700 000032 MOV #32,RO ‘SET LOOP FOR BITS 4-0 
004150 005007 CLR R1 :SET TEST WORD 
004152 010177 174356 LTSA: MOV R1,aMR ‘SEND TEST WORD TO MR 
004156 017702 174352 MOV amr ,R2 SREAD MR 
004162 042702 177740 BIC #177740,R2 :MASK BITS 4-0 
004166 020102 CMP R1,R2 ‘SEE IF EXPT = RECVD 
004170 001026 BNE LT5ER1 
004172 005300 LTSB: DEC RO 
004174 001402 BEQ LTSC :1F DONE LOOP: BR 
004176 005201 INC R1 ‘BUMP TEST WORD 
004200 000764 BR LTSA = CONTINUE LOOP 
004202 012701 000015 LT5C: MOV #15,R1 [SET TEST WORD + WAM 3 
004206 012700 001000 MOV #1000.R0 :SET LOOP FOR BITS 15-7 
004212 010177 174316 LTSD: MOV R1,aMR [LOAD MR 
004216 017702 174312 MOV am ,R2 [READ MR 
004222 042702 000140 BIC #140,R2 ‘MASK OUT BITS 5.6 
004226 020102 CMP R1,R2 SSEE IF EXPT = RECVD 
230 001401 BEQ ‘IF SO: 
004232 16 F BR LTSER2 SELSE GO TO ERR 2 
2 00 LT5E: DEC 
004236 001425 BEQ LTSX :1F DONE LOOP: BR 
004240 062701 000200 ADD #200,R1 [BUMP TEST WORD 
004244 000762 BR LT5D [CONTINUE LOOP 
004246 012737 021611 000666 LTSER1T: MOV AMSG14.ERADD  :SET ERROR CODE 
004254 012737 004152 000706 MOV #LTSA, SCOLP [SET SCOPE ADDRESS 
004262 004737 016272 JSR PC .LTGER1 :GO TO ERROR 
004266 000741 BR LT5B * CONT INUE 
004270 012737 021626 900666 LTSER2: MOV #MSG15,ERADD :SET ERROR CODE 
004276 012737 004212 000706 MOV #LT5D,SCOLP :SET SCOPE ADDRESS 
004304 004737 016272 JSR PC,_TGER1 :GO TO ERROR 
004310 000751 BR LT5E CONT INUE 
004312 004737 016534 LT5X: JSR PC, ITER 3:GO SEE IF ITERATIONS 
004316 000137 002460 JMP TSCD2 SRETURN TO SCHED 
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;LOGIC TEST 6: TC REGISTER BIT TEST#«««xxnnne 


MLM 


LT6: NOP 
024201 000616 LT6IT: #MSLT6,EMADDR ;POINT TO LT6 HEADER 
000003 MO #3,RO0 ;SET NUMBER OF TESTS 


PC, INIT1 :GO_ INIT 
Ria nS [WRITE TC 


*READ TC 
#160000, R2 “MASK OUT SAC 
R1.R ‘SEE IF EXPT = RECVD 
treet SIF NOT: BR 
LT6X :1F DONE ALL: BR 
000001 #1,RO ‘SEE IF RESET TEST 


LT6A1 :IF SO: 
017777 #17777,R1 SET TEST WORD 
: BR LT6A :DO SeT TEST 
021654 000666 LT6ER1: 4#MSG18,ERADD SET ERROR CODE 
004344 000706 MO #LT6B,SCOLP SET SCOPE ADDRES 
016272 4 ae [GO TO ERROR 


BR L ; CONT INUE 
016534 LT6X: [GO SEE IF ITERATIONS 
002460 J 2 RETURN TO SCHED 


pik 


741 
741 
600 


WARS 
RSES 


174172 
174166 
160000 


REP ERE PERE E TEES 


PESSSRAREZER 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
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;LOGIC TEST 7: FRAME COUNT BIT TEST#*xxnanann 


000003 : #3,RO :SET TEST NUMBER 

024250 T7C: AMSLT7,EMADDR ;SET TEST HEADER 
R SET TEST WORD 

016662 : PC,INIT1 :GO_INIT 

174032 MO R1,aFC are COUNT 


174026 RE 
7SEE IF EXPT = RECVD 
SEE IF DONE AiL 
L :1F SO: 
000001 : SEE IF RESET TEST 
177777 Ser TEST WORD TO -1 
LT7A TINUE 


BR f 
021673 LT7ER1: 4MSG19, ERADD 
004454 MO #LT7A, SCOLP 
016272 PC,LTGER1 

BR LT7B 
000003 LT?X: ny RO EST AMT 
016534 J PC. ITER :G0 SEE IF ITERATIONS 
002460 TSCD2 [RETURN TO SCHED 


004 
004 
004 
004 
004 
004 
004 
004 


Pras 
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sLOGIC TEST 10: FUNCTION CODE BIT TEST**xxxnnnn 


024317 IT: #MSLT10,EMADDR ;SET TEST HEADER 
000003 MO #3,RO ‘SET NUMBER OF TESTS 
‘SET TEST WORRD 


: IN 
SELECT DRIVE 
WRITE C1 


MO aci,R2 TREAD C1 
177701 : ‘MASK FUNCTION CODE 
MP R1,R2 SSEE IF EXPT = RECVD 


E :1F DONE ALL: BR 
000001 MP #1,R SEE IF RESET TEST 
:1F SO: BR 
000076 - :SET TEST WORD 
021712 000666 LT10E1: G20,ERAD 
004570 000706 MO #LT19A,SCOLP 
016272 PCL TGER1 


BR 
016534 LT1OX: PC, ITER “1 ; 
002460 JMP TSCD2 [RETURN TO SCHED 





CZTEABO TMO3-TE16/TU77 CTL I 


CZTEAB.P11 


15=NOV=78 13: 


10 

024375 
016662 
173572 
000001 
000015 
173560 
001700 


000071 
173532 
000001 


016662 
173514 
000001 _ 


021744 
000001 


004700 
016272 
022002 
000001 
004724 
016272 
022023 
000001 
004764 
016272 
016534 
002460 


MACY11 30A(1052) 


173602 


173576 
173536 


000666 


000706 


000666 


000706 


000666 


000706 


LT11E1: 
BR 
LT11E2: : V 


BR 
LT11E3: : V 


M 4 
21=-DEC-78 13:08 PAGE 51 


#MSLT11,EMADDR 
PC, INITI 
aci,R2 

#1,R 


LT11€3 
AMSG21 , ERADD 
a} Ae 
#LT111T,SCOLP 
PC,LTGER1 
LT11B 

#MSG22 ,ERADD 
Re 


#1,R1 
#LT11B,SCOLP 
+7) aah 


LT11C 
wsGcs., -ERADD 


#1,R2 
#LT11C,SCOLP 
PC ,LTGER1 
PC, ITER 
TSCD2 


SEQ 0051 


sLOGIC TEST 11: GO BIT SET RESETe«xnnnnnnn 


sSET TEST HEADER 
:GO INIT 


sREAD (1 
:SEE IF GO=0 


SELECT WAM 3 


:SET or 
“SEE IF GO =1 


:GO_ INIT 
READ C1 
esse y GO=0 


:BR 
iELse = TO ERROR 3 
+ ODE 


; CVD 
Ph 4 ns 


7GO PRINT ERROR 
:GO SEE IF ITERATIONS 


;RETURN TO SCHED 





N 4 
iS. te Saad ba ik | Ao MACY11 30A(1052) 21=DEC-78 13:08 PAGE 52 


15=NOV=7. SEQ 0052 


sLOGIC TEST 12: DRIVE READY BITexxxannnns 


: NOP 
024442 000616 : MOV WMSLT12,EMADDR ;:SET TEST HEADER 
016662 7 PC, INIT1 :GO 
173356 BI #960 aps SEE TF DRY=1 


LT12E1 
173360 15 
173354 


173314 MO 
173320 a . #2 ‘SEE IF DRY=0 


3SET WAM3 
; ASSURE FCS = 1 


: INIT 
173304 T #200 See IF DRY=1 
E LT12x SO: 


LT12E3 ‘ELS GO TO ERROR 3 
022056 000666 LT12E1: MOV HMSG24,ERADD  ;SET ERROR CODE 
005124 000706 #LT12IT,SCOLP’ SET SCOPE ADDRESS 
016264 i 47; ted :GO TO ERROR 


LT12B : CONTINUE 
000666 LT12E2: AMSG25 , ERADD 7SET ERROR CODE 
000706 #LT12B,SCOLP SET LOOP ADDRESS 

016264 re Pech reene :GO PRINT ERROR 


LT12C ; CONTINUE 
022133 000666 LT12E3: #MSG25A,ERADD SET ERROR CODE 
005204 000706 - #LT12C,SCOLP :SET ERROR LOOP 

016264 J PC ,LTGER2 GET PRINT ERROR 

016534 LT12x: PC, ITER :GO_TO ITERATION SUBROUTINE 
002460 J TSCD2 [RETURN TO SCHED 


Nm 
= 
oO 
= 


2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 


ae ce ed ad ceed cae cd cd eed eed cs ed cd ed 
-—_ 
ARWVY=SSKIKARAS 





mm 


WNW NMVNVNNMNNNN 


5 
aa a Bl T I MACY11 30A(1052) 21-DEC-78 13:08 PAGE 53 
-P11 15-NOV-78 13:10 SEQ 0053 


a4 


sLOGIC TEST 13: INTERRUPT TEST*«xxannane 


LT13: RO 
MO #MSLT13,EMADDR ;SET TEST HEADER 
LT13IT: PC, INITI :60 INIT, SELECT DRIVE, SELECT ABOVE 
000664 MO wT I3x, RTRN 3SET RETURN ADDRESS 
ac LEAR CS1 
‘SET PRIORITY 
173132 BI #100,aC1 ‘BIT SET IE 
LT13A: RO 
BNE LT13A sAWAIT INTERRUPT 
173176 LT13E1: #340, aPSW 
000666 MO #MSG26 , ERADD 
000706 #LT131T,SCOLP 
PC ,LTGER2 


J ; NT ERROR 
LT13xX: PC, ITER :GO_TO ITERATION SUBROUTINE 
J TSCD2 SRETURN TO SCHED 


2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 


eee a ed ed aed 8 = = I I 
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an 
NN 
+— 


oe | NEXT 4 TESTS ARE MANUAL INTERVENTION alk TESTS. 
THE OPERATOR WILL BE REQUIRED TO MANIPULATE THE TE16 
CONTROL PANEL IN ACCORDANCE WITH TTY INSTRUCTIONS. 


;LOGIC TEST 14: STATUS AT BOT ON LINE, LOADED, NO WRITE RING**«xxxxx0 
173142 : . 4 IF INHIB MAN TST 
BNE LT14A T: 
See IF SINGLE TEST 
F NOT: BR 
ELSE GO PRINT INHIB MSG 
ST HEADER 


;SET TE 
SET INSTRUCTION ONE 
JS GO DO INSTRUCTION 
LT141T: SINIT, SELECT DRIVE + SLAVE 
MO #14602. RI :SET TEST WOR 
aes .¢ sASSURE MOL ,WRL,DPR,DRY ,BOT 


LT14X :1F SO: BR 
000706 WLT141T,SCOLP SET LOOP ADDRESS 
000666 G27, ERAD :SET ERROR CODE 
[GO PRINT ERROR 
: :GO SEE IF ITERATION 
002460 : 2 RETURN TO SCHED 


Ww 


LT14A: 


SS8SS8sSs oo 
—_ — 2D 

R MmrMm—OnNr nore 
-=NNNNES SNS 
YSysSsssscoyyeseg 
NNNNNONMNM =] NN 


2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
4 
2 
2 


a ed ed 8 wd de 


BSBIFRKUNMSSSESSESLESES Se 
WOONAUEWN OO OONAUSWN—OO 
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~ 
2S fe 


;LOGIC TEST 15: STATUS AT BOT, OFFLINE, LOADED, NO WRITE RING##eeseeeee 
173032 - : Hy CTSA -@SWR 7 SEE a _INHIB MAN TST 
SEE TF * SINGLE TEST 
F NOT: 


STFL 
PTISxX BR 
JMP INMT TELSE GO PRINT INHIB MSG 
060616 LT15A: AMSLT15,EMADDR ;SET TEST HEADER 
MO AMMSG2 ,R4 


J sPRINT INSTRUCTION 
LTISIT: :GO_INIT, SELECT DRIVE, SLAV 
MO a SET TEST WORD 
sREAD STATUS 
:SEE OF EXPT=RCVD 


LT15X 
000706 MLTI5IT,SCOLP ;SET LOOP ADDRESS 
#MSG27, ERADD ; 


000666 
PC,LTGER1 ;GO PR OR 
PC, ITER :GO SEE IF ITERATIONS 
TSCD2 RETURN TO SCHED 


NNWNUTN 


2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 


SS SS SS SS SS SS SS SS SS SS SS ss SS 
SIGNS ARANISSRIEATLAR 
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On 
NN 
<4 


= 
Co 
— 


sLOGIC TEST 16: STATUS AT EOT, ON-LINE, NO WRITE RING***xxeeenn 
172722 : #1000 ,aSwR :SEE if _INHIB MAN TST 
BN LT16A : BR 
STFLG SEE TF “SINGLE TEST 
F NOT: BR 


LT16XX 
J INMT TELSE GO PRINT INHIB MSG 
LT16A: #MSLT16,EMADDR ;SET TEST HEADER 
MO AMMSG3 .R4 


J :GO PRINT INSTRUCTION 
LT16IT: PC, INIT2 ;SEL ECT DRIVE ,SLAVE 
MO SET TEST WORD (ATA!MOL!WRL!EOT!DPR!DRY!SSC!SLA) 
READ STATUS 
++B MASK PES BIT 
: SEE IF EXPT=RCVD 


LT1AX ;I1F SO: BR 
000706 MLT161T,SCOLP :SET LOOP ADDRESS 
000666 #MSG27, ERADD 
PC,LTGER1 
: PC,ITER 
002460 : TS(D2 ;RETURN TO SCHED 


S38 
_— 
nore 
N= 


N 
ques 


NNNNNONMNMN— NN 


pate) 


BLRARALVLESELEARALT 
oo 
——? 
YVYYN 


042 

02010 
00141 
01273 
01273 
00473 
00473 
00013 
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032777 
001005 
005737 


002460 


F 5 
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;LOGIC TEST 17: STATUS AT ON LINE, LOADED**«sexenns 
172606 : #1000 ,aSwWR ;SEE IF INHIB MAN TST 
BN LT17A 7; 1F NOT: BR 
i SEE IF SINGLE TEST 
F NOT: BR 
TELSE GO PRINT INHIB MSG 


STFLG 
LT17XX 


J INMT 
060616 LT17A: AMSLT17,EMADDR ;SET TEST HEADER 
MO AMMSG4 ,R4 


J :GO PRINT INSTRUCTION 
LT17IT: P T SELECT DRIVE, SLAVE 
MO ;SET TEST WORD 


SEE IF EXPT=RCVD 


uT17X O: BR 
000706 #LT171T,SCOLP ‘SET LOOP ADDRESS 
000666 #MSG27 ,ERADD SET ERROR CODE 
PC,LTGER1 ;YES PRINT ERROR 
PC, ITER :GO SEE IF ITERATIONS 
TSCD2 RETURN TO SCHED 


SEQ 0057 
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025127 


172356 


eeiees 
000001 
015156 


aah and and an ant ea oth ent an eee 
MOON MAO 


015144 


000670 


016534 
015624 
002460 


= 
& 


006070 
006076 
006104 
006 
006 
006 
006 
006 
006 
006 
006 
006 
006 
006166 
006172 
006174 
006176 
006204 
006206 
006210 
0062 
006216 
006222 
006226 
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060616 
000706 
000670 


172362 
172346 


000666 
000712 


LT20: 


MO 
LT20IT: 


LT20A: 


LOGIC TEST 20: 


~ FOLLOWING 11 TESTS WILL if 3 ALL POSSIBLE ERROR BITS 


Y FORCING THEIR CONDITIONS THROUGH VARIOUS ILLEGAL PROGRAMMING 
ff petty AND USING THE MAINTENANCE WILL MODES AVAILABLE WITH TMO3 
;FOR EACH ERROR “at age SET a 3 APPROPRIATE STATUS WILL BE 
>CHECKED. IE: ERR, - SLA, SC ETC. 


ILLEGAL FUNCTION CILF) sxxxxxanne 


AMSLT20,EMADDR HH TEST HEADER 
#LT20A,SCOLP :SET LOOP ADDRESS 

#22 ,R0 SET NUMBER OF ILL CODES 
#ILFT, TEMP1 ;POINT TO START IF TABLE 

1 :GO_INIT, SELECT SLAVE + DRIVE 

4-1 ,awC 1 
#1 -R1 
@aTEMP1 aC 
@ER ,R2 


‘SET WC= 
:SET TEST WORD 
‘SET ILL CODE 
SREAD ER 
R1,R2 :SEE IF EXPT=RCVD 
LT208 F SO: BR 
#™MS17,ERADD : SET ERROR CODE 
#1,EXFL sSET EXPT FLG 
PCL TGERO :GO PRINT ERROR 
R1,R2 iSEE AUNEXBECTED ERRORS 


LT20C 

PC,LTGERS ‘EL st PRINT ERROR 

RO SEE IF DONE ALL ILL CODES 
:1F SO: BR 


[BUMP ADDRESS 
: CONT INUE 
:GO SEE IF ITERATION 


=F “DRVCLR 
SCD2 RETURN TO SCHED 


SEQ 0058 
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C7TEAB.P11—- 15=NOV=78 13:10 SEQ 0059 
2259 
3260 ;LOGIC TEST 21: REGISTER MODIFICATION REFUSED (RMR) *xexenneee 
2 006232 012737 025206 000616 LT21: MOV #MSLT21,EMADDR ;SET TEST HEADER 
2263 006240 012737 006246 000706 MOV #LTO1IT.SCOLP 3SET SCOPE LOOP ADDRESS 
2264 006246 004737 016662 LT21IT: JSR PC INITi GO ye AP SELECT SLAVE, DRIVE 
2265 006252 052777 000300 172262 BIS #300, aTC :SET FORMAT 
2266 006260 012777 000015 172246 MOV #15,aMR WAM3 
2267 006266 012777 000071 172214 MOV #71.aC1 ‘SET READ+GO 
2268 006274 005077 172216 CLR arc ert aee WRITE TO FC 
2269 006300 012701 000004 MOV #4,R1 ‘SET TEST WORD 
2270 006304 017702 172214 MOV aER,R2 [GET ER 
2271 006310 030102 BIT R1,R2 : SEE IF EXPT=RCVD 
2272 006312 001011 BNE LT21A F SO: BR 
2273 006314 012737 027461 000666 MOV #TMS19,ERADD <SET ERROR CODE 
2274 006322 012737 000001 000712 MOV #1, EXFL *SET EXPT FLG 
2275 006330 004737 015156 JSR PC,LTGERO GO PRINT ERROR 
2276 006334 000404 BR L121B 
2277 006336 020102 LT21A: CMP R1,R2 ene IF UNEXPECTED ERRORS 
2278 006340 001402 BEQ LT31B F NOT: BR 
2279 006342 004737 015144 JSR PC,LTGERS3 “ELSE 60 PRINT ERROR 
2280 3++B LT21B: JSR PC,ITER 3++B DELETED GO SEE IF ITERATION 
2281 006346 012703 040000 (1218: MOV #40000,R3 
2282 006352 005303 LT21KA: DEC R3 :DELAY FOR ALPHA 
2283 006354 001376 BNE LT21xA 
2284 006356 004737 015010 JSR PC, EORPA :GO DO EOR CLEAR 
2285 006362 004737 015624 JSR PC. DRVCLR 
2286 006366 004737 016534 JSR PC. ITER 3++B GO SEE IF ITERATION 
2287 006372 000137 002460 MP TSCD2 “RETURN TO SCHED 
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sLOGIC TEST 22: CONTROL BUS PARITY (CPAR)****eeeewe 


025242 000616 LT22: #MSLT22,EMADDR ;SET TEST HEADER 
006412 000706 MO WLT22IT,SCOLP SET SCOPE LOOP ADDRESS 

LT22IT: PC, INITI INIT, SELECT SLAVE+DRIVE 
172074 BI #20,aCS > ENABLE Wis PARITY ON MB 
172064 FC SWRITE TO FC 

MOV :SET_ TEST WORD 

172054 RESET PARITY TO ODD 
@ER ,R2 R 


172054 
SFE IF EXPT=RCVD 


LT22A :IF SO: BR 
027467 000666 SSET ERROR CODE 
000001 000712 #1, EXFL ‘SET EXPT FLG 
015156 Js Col :GO PRINT ERROR 
:SEE IF UNEXPECTED ERRORS 
[IF NOT: BR 


T22X 
015144 BC. LTGER3 TELSE GO PRINT ERROR 
PC, ITER :GO SEE IF ITERATION 
PC,DRVCLR 
TSCD2 


sRETURN TO SCHED 
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Nm 
Iw 
puts 
_ 


rorror 


eh 
WAIWIANWW 
ee ee ee | 
NOUS WI 
es 


2 
2321 006562 012777 000071 
$356 006570 017702 171730 


1011 

2737 027476 
006606 000001 
2327 006614 004737 015156 


2328 006620 0004 

2329 006622 020102 

2330 006624 00140 

2331 006626 004737 015144 
2332 006632 004737 016534 
2335 006636 004737 015010 
2 006642 004737 015624 


MACY11 30A(1052) 


171772 


171752 
171720 


000666 
000712 


37 025277 000616 LT23: 
3 5 0007 


LT23A: 


LT23X: 


21-DEC-78 


J 5 
13:08 PAGE 61 


sLOGIC TEST 23: FORMAT ERROR(FMT) seexxnnane 


MOV 


MOV 


#MSLT23,EMADDR 
WTDsiT SCOLP 


LT 
#TMS21 , ERADD 


#1, EXFL 
PC“LTGERO 
LT23x 


+? “DRVCLR 
TSCD. 


SET TEST HEADER 


7SET SCOPE ADDRESS 
+48 DELETED SET ILL EGAL F 


+48 SET IL 3 FORMA 
; SET T_WOR’ 


SET 
;SET READ+GO 
sR R 


E 
SEE _IF EXPT=RCVD 


:1F SO: BR 
[SET ERROR CODE 
SET EXPT FLG 


[GO PRINT ERROR 


ree St. UNEXPECTED ERRORS 


BR 
TELSE GO PRINT ERROR 
:GO SEE IF ITERATION 


RETURN TO SCHED 


FOR BOTH M8906 & M8915 


SEQ 0061 
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LOGIC TEST 24: DATA BUS PARITY ERROR(DPAR) **xxxexene 


000616 LT24: Tit Score SET TEST HEADER 
0007 MO SCOLP ;SET SCOPE ADDRESS 
LT24IT: : V 


3GO INIT, SELECT DRIVE+SLAVE 
SET NORMAL FORMAT 


ooo 
aad ooh al 
nonroro 

Ww 


NNNNN 
AW 


:SET BA 
sSET FC 
sSET WC 
sSELECT WAM 2 
;SET WRITE+GO 


FORCE EVEN PARITY 
SET TEST WORD 


joleleleale) 
—23 3 aa 


;DELAY 


MO 
000013 171526 : . 4 CLOCK MR 4 TIMES 
000002 4 IF DONE 1 BYTE 
F NOT: BR 


171512 MO aR R1 ‘eLse 1g BYTE 1 
LT24B0: TST RO iSEE I F BYTE 2 


3I1F NOT: 
171502 [GET BYTE 8 
RO 
LT24C: 
s DELAY 
000040 171456 :SEE IF DPAR IS SET 
F SO: BR 


R1 
177400 phy Gal :GET LOW BYTE 
000377 #377 ,R4 

RG Ri :GET HIGH BYTE 
000740 T24F 
027504 wims22. ERADD 
000001 000712 #1, EXFL 
015156 PC LTGERO : 
000740 TO4FL [CLEAR FLAG 


000050 : 
171376 MO R,R tt REGISTER 


020000 
SEE IF UNEXPECTED ERRORS 
NOT: BR 


T24X c1F 
015144 J BC LTGER3 TELSE SO PRINT ERROR 
000020 171350 : #20, aCS [RESET EVEN PARITY 
JS PC,EORPA :GO DO EOR CLEAR 
PC°DRVCLR :GO SEE IF DRIVE CLEAR Ok 
PC_ITER *GO SEE IF ITERATION 


000602 ach, ITAMT 
TSCb2 :RETURN TO SCHED 
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sLOGIC TEST 25: NON-EXECUTABLE FUNCTION(NEF ) «enews 


012737 5404 000616 LT25:_ MOV ag Me EMADDR ;SET TEST HEADER 
004737 LT25IT: PC SodM : INIT, a gl DRIVE+SLAVE 
B SET NORMAL FORMAT 


7SET ITLLEGAL FC 
7SET WAM 2 


[LOAD WRITE+GO 
:SET TEST WORD 


e ER 
:SEE IF EXPT=RCVD 
LTOSA TIF SO: BR 
ALT251T,SCOLP :SET LOOP ADDRESS 
#TMs3| 7ERADD ‘SET ERROR CODE 
#1,EXF :SET EXPT FLAG 
PC “FTGERO ‘GO PRINT ERROR 
LT25xX 
SEE 1 UNEXPECTED ERRORS 


:1F NOT: BR 
ZELSE GO PRINT ERROR 
:GO SEE IF ITERATION 


RETURN TO SCHED 


PC, 
PC,DRVCLR 
TSCD2 
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sLOGIC TEST 26: FRAME COUNT ERROR(FCE) *xxxannane 


025440 L726: MO #MSLT26,EMADDR ;SET TEST HEADER 
016719 LT26IT: Js PC. INITS SINIT, SELECT DRIVE+SLAVE 


1$: 


Ss 
— 
Nm 


28g 


AWAIT OPI yf 
T NORMAL FORMAT 


7SET WC=-10 
TSET FC=-20 
3SET 


WAM 3 
[LOAD WRITE+GO 
:SET TEST WORD 


jelolelelele) 
agesce 


; DELAY 
;LOAD MM EOR CLEAR 
RESET MR 


RO 
171056 : . sSEE IF FCE SET 
BN 4$ F SO: BR 


; DELAY 


171040 aER,R2 :GET ER 
007336 9 #LT26IT,SCOLP SET SCOPE ADDRESS 


027551 000666 A#TMS28 , ERADD 
SET EXPT FLG 


000001 #1, EXFL 

015156 4 gga :GO PRINT ERROR 

171004 : @ER,R2 GET ERROR REGISTER 
R1,R2 iy ht: eR ERRORS 


LT26X ; IF 
015144 J PC,LTGERS SELSE GO PRINT ERROR 
016534 : : PC. ITER :GO SEE IF ITERATION 


PC ,DRVCLR 
TSCD2 RETURN TO SCHED 
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sLOGIC TEST 27: ILLEGAL REGISTER(ILR) sxxennnnnn 
022737 172400 LT27: #1 £5600. C1 eare IF ADDRESSES OPEN 
001041 BN F NOT: BR 


LT27XX 
007600 #LT27A, SCOLP “SET SCOPE ADDRESS 
025474 MO #MSLT27,EMADDR :SET TEST HEADER 
0 LT271T: #20,R0 :SET NUMBER OF ILR TESTS 
172434 MO #172634_R1 ‘SET FIRST ILR ADDRESS 
016710 LT27A: PC, INITS :GO INIT, SELECT DRIVE+SLAVE 
MO (R1) ,R3 SATTEMPT ILR READ 
000002 170710 #2,aER ZSEE IF ILR=1 
278 -IF SO: BR 


LT ; 
000001 000712 #1,EXFL SET EXPT-NOT RCVD FLAG 
027373 000666 #TMS10 ” aes : CODE 


015164 J ’ 
LT27B: RO SEE IF DONE ALL 
B ;IF SO: BR 


BUMP ADDRESS 
BR CONTINUE TESTS 
016534 L127X: JS PC,ITE :GO SEE IF ITERATIONS 
015624 JSR PC-DRVCLR 
062460 LT27XX: JMP TSCD2 RETURN TO SCHED 
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;LOGIC TEST 30: DRIVE TIMING ERROR**seeeeene 


000666 L130: #TMS32 ,ERADD ;SET ERROR CODE 
000616 MOV MMSLTSO,EMADDR ;SET TEST HEADER 
000706 MO :SET_ SCOPE ADDRESS 
LT30IT: JSR OS60 oF 4 seats DRIVE + SLAVE 
170624 8 a arc 1 NORMAL FORMAT 


MOV a R SET T T WORD 
170604 oe gt OCCUPIED 


170546 MOV OAD WRITE+GO 
170554 #9 R ‘SEE IF DTE SET 


‘IF SO: BR 
000712 y ‘SET EXPT FLG 
*GO PRINT ERROR 
: :GO INIT SELECT DRIVE,SLAVE 
170544 4300" arc ‘SET FORMAT 
MOV #10000, R1 :SET TEST WORD 
7 ar C “SET FCS 
170520 #15, aM SSET WRAP 3 
170466 #61.aC1 ‘LOAD WRITE+GO 


#40000,R4 
arc :SEE IF ALPHA 
SAWAIT ALPHA 


;PRINT HEADER 
;PRINT ALPHA ERROR 


170440 : :CLOCK MR 
170432 4 CLOCK MR 


BN LT30D :DELA 
170406 #10000 ,aER 7 SEE IF DTE SET 
LT30E :1F SO: a? 
000001 000712 #1 "EX FL [SET EXPT FLG 
015156 pe PCL TGERO 360 PRINT ERROR 


LT 
#10000 ,R1 7 SET 


TEST WORD 

7GET ERROR REGISTER 
:MASK OPI AND VPE 

SEE IF UNEXPECTED ERRORS 

180% :1F NOT: 

BC, LTGER3 TELSE GO PRINT ERROR 
PC,ITER :GO SEE IF ITERATION 
PC,EORPA :GO CLEAR GO BIT 


res DRVCLR 
TSCD2 ;RETURN TO SCHED 


@ER,R 
#20100, R2 


leleleleleleleleleleleleleleleloio) 
SP? PP PP PPP PPV SV OV Oe _—" 
lelelelelelelelelelelelelelelelejo) 

N VMN & SWAN 
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sLOGIC TEST 31: OPERATION INCOMPLETE (OPI) ***xexeewe 


#MSLT31,EMADDR ;SET TEST HEADER 
WLT31IT.SCOLP SET SCOPE ADDRESS 
PIMSS3A’ ERADD SET ERROR MSG HDR 
#2,1TAMT :SET REDUCED _ITER COUNT 
a% -INIT3 :INIT, SELECT DRIVE+SLAVE 


jeleolele) 
par Sour Peer ows 
rorororo 
NNNN™N 
WINNING 
NNNNN 


2 


388 
88 


sAWAIT OPI _ RESET 
170272 ;SET FORMAT 
170256 


$ CSscs 
pr PTW 
Minn un 
ONNW 
N 
N 


BIT (OPI) 
T RETURN ADDRESS FROM TIMER 
‘oFaRt TIMER 
000061 170204 ;LOAD WRITE+GO 
170214 : 3 R5,@ER BRANCH WHEN OPI SETS 


010576 TIMER(R3) :GO_TO TIMER & RETURN TO 2$ ABOVE 
170202 : @ER,R2 GET ERROR REGISTER 
77 Kad 7 SEE - UNEXPECTED ERRORS 


7 NO s 
015144 PC gL TGERS TELSE PRINT ERROR 
004737 010670 : PC, TIMOK :GO CHECK TIME FOR OPI TO SET 
102450 LT31x sBRANCH IF TIME WAS INCORRECT 


012737 010356 000706 #LT31A,SCOLP  ;SET SCOPE LOOP 
027630 000666 MO #1MS33B,ERADD :SET ERROR MSG HEADER 
016710 J PC. _INITS ‘GO INIT 


:WAIT FOR OPI TO CLEAR 


1$ 
000300 SET FORMAT 
000015 #15 ,aMR SET WRAP 3 
010426 #2$ ,R2 SET RETURN ADDRESS FROM TIMER 
020000 :SET TEST WORD 
010504 START TIMER 
000071 170062 ;LOAD READ+GO 
170072 : a R5,@ER BRANCH WHEN OPI SETS 


010576 TIMER(R3) :GO TO TIMER 
170060 : @ER ,R2 [GET ERROR REGISTER 

aaene SEE IF UNEXPECTED ERRORS 
015144 PC,LTGERS sELSE PRINT ERROR 

LT51X ST 


BR EXIT TE 
010670 4$: J GO CHECK TIME 
016534 ; ‘ PC, ITER :GO SEE IF ITERATIONS 


10342 
0 
0362 
0364 

10370 


Oo 
S 
Oo 


MACKS 


ALOAOLO 


SS a SS Ss SS Ss SS SS SS Ss SY 1 SS 


So 
Ww 


RRRRRRRRERRRRRKK 


RETURN TO SCHED 
sROUTINE TO START THE TIMER. THE TIMER IS AN OSCILLATOR IN THE MAINT~ 
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7 ENANCE wits (BIT 6) THAT TOGGLES EVERY 56 (10) MICROSECONDS. THIS 
;ROUTINE WAITS FOR THE 9 aaa TO TOGGLE AND RETURN WITH R3 INDICATING 
{THE STATE, OF 4 wae TOR. 


CLEAR TICK COUNT 


MOV 24 RS ;PRESET INDEX TO TIMER 
170012 #100, aM ‘BRANCH IF OSC CLEAR 


170002 ‘1$: too om z;WAIT FOR OSC TO CLEAR 
4$ sEXIT 


2$: R3 ;SET_INDEX TO TIMER 
167766 3$: alata WAIT FOR OSC TO SET 


010550 4$: PC ;RETURN 


THIS ROUTINE TIMES AN EVENT. EACH TIME THE OSCILLATOR BIT CHANGES 
STATE THE 2 COUNT IN R1 & RO IS INCREMENTED. THE ROUTINE IS CALLED 
Avy: R3_AS AN INDEX TO peices THE OSCILLATORS PAST STATE. WHEN 
THE OSC BIT CHANGES STATE R35 IS NEGATED. 
010552 167754 TIMER]: BIT #100,aMR » BRANCH iF OSC HAS CHANGED STATE 
010560 001406 BEQ TIMER 
010562 000112 JMP (R2) RETURN 
-=TIMER1+24 
010576 005403 TIMER: NEG R3 SET INDEX TO OTHER STATE 
10600 0627: A : INCREMENT TICK COUNT 


;BRANCH IF TIMER OVERFLOWS 
Re ;RETURN 
167704 TIMERO: BIT :BRANCH IF OSC SET 
ZRETURN 
TIMOVF : EMADDR,R4 ; TYPE TEST HEADER 
J PC, TTOUT 
ERADD ,R4 iGET ERROR MSG ADDRESS 
PC, TTOUT ‘AND TYPE IT 
ATMS33E RS TYPE 
PC, TTOUT = "TIMER OVERFLOWED* 
010462 LT31x :GO EXIT TEST 
ROUTINE TO CHECK IF TIME IS WITHIN LIMITS. IF NOT THE ROUTINE RE TURNS 
“WITH THE 'v° BIT SET. THE ub iMiTs WERE SLECTED BY DIVIDING THE TIME 
ZIN MICROSECONDS BY 448. LOWER LIMIT 5 00. 2000 SECS (5.5 SECS): 
“THE UPPER LIMIT IS 9,500, "660 USECS (9.5 $3 635° E468 1s DERIVED FROM 
556 USECS/TICK TIMCS THE DIVISION BY 8 BY THE TIMOR TINE. 


DIVIDE COUNT BY 8 
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001010 SLVTYP,R1 ae as TYPE (0/1 = TE16/TU77) 

011020 :  ieateai ;+#B BRANCH IF GREATER THAN LOWER LIMIT(5.5 SECS) 
GET ERROR MSG HEADER 
; TYPE ERROR MSG HEADER 
[GET ERROR DESCRIPTOR MSG 


PC, 
iMSS3e RG ;TYPE "OCCURED TOO SOON' 
017662 PC, TTOUT 


2$ 
011024 :  aateaiat 3++B BRANCH IF LESS THAN UPPER LIMIT(9.5 SECS) 
:GET ERROR MSG HEADER 


el 
DD ee nD ed ed ed —_ 
oO Lo] a 
i | 


oO ooossecoooo 
oO 
N 
a 
oO 


;SET *V’ TO INDICATE ERROR 


TYPE ERROR MSG HEADER 
f : TYPE ‘OCCURED TOO LATE’ 
17662 PC, TTOUT 


2$: PC 


;++B TABLE OF MIN AND MAX TIMES FOR OPI FOR TE16 AND TU77 SLAVES 
:++B MIN TIMES os 5_SECS) 

027764 200$:  .WORD 12276. ;++B TE16 

020622 «WORD 8594. 3++B TU77 


3++B MAX TIMES (9.5 SECS) 
051325 201$:  .WORD 21205. 3++B TE16 
034774 «WORD 14844. 3++B TU77 
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sLOGIC TEST 32: UNSAFE (UNS) **exxexwee 


000616 LT32: #MSLT32,EMADDR ;SET TEST HEADER 

000706 V mT 3elT SCOLP :SET SCOPE ADDRESS 
LT32IT: NITS INIT SELECT DRIVE +SLAVE 
MO T SLAVE NUMBER 


SLOAN RO : 
SLIN FO [+4+B SET TEST WORD (UNS) 
167450 #4,aDT +48 BRANCH IF TE16 


1$ ++B 
#4000,R1 ;++B SET ALSO NEF FOR TU77 
: OM R SET NONEXISTANT SLAVE 
177770 #177770,R0 :MASK SLAVE NUMBER 
#300,RO T FORMAT 


000300 
167430 MO R0,aTC 7SELECT ILLEGAL SLAVE 
002000 167416 40 SEXIT TEST IF SALVE AVAILABLE 


000071 167360 + LOAD READ+GO 
167370 ;READ ER 
SEE IF EXPT=RCVD 
:1F SO: BR 


027730 000666 #TMS34 ERADD 3SET ERROR CODE 
000001 000712 #1,EX FL SET ERROR CODE 
015156 PC-LTGERO “GO PRINT ERROR 
BR LT 32x 
2$: R1,R2 :SEE IF UNEXPECTED ERRORS 
[IF NOT: BR 


LT52x 
015144 J PC,LTGERS3 SELSE PRINT ERROR 
016534 LT32x: PC,ITER :GO SEE IF ITERATIONS 
015624 JSR PC,DRVCLR 
002460 LT32xx: JMP TSCD2 sRETURN TO SCHED 


Se 
ae 


ooo SSR 
oO yu 
RaNIRerSe 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 


a ii ed ed ed ad od 
— ee = =) 2 = = 2) 2 2 = 2 2 2 2 2 2 st 


NOR SS 3 SS SS 
VANSEVSRSESEKSVNSVE 
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THE FOLLOWING 6 TESTS WILL LOOK AT VARIOUS BITS IN THE 
:DRIVE STATUS(DS) AND TAPE CONTROL (TC) 

[REGISTERS BY FORCING CERTAIN CONDITONS WHICH DO NOT 
SREQUIRE TAPE MOVEMENT. 


sLOGIC TEST 33: POSITIONING IN PROGRESS (PIP) ***xxeee«® 


025656 060616 LT33: #MSLT33,EMADDR ;SET TEST HEADER 
000706 MO MLT33IT.SCOLP =SET SCOPE ADDRESS 
LT33IT: PC, INITS tINIT, SELECT DRIVE+SLAVE 
MO #13,aMR SET was 2 


#SET FCS 
#31,aC1 ;LOAD SPACE FORWARD+GO 
167244 oN [SEE IF PIP=1 


L :1F SO: BR 
000666 47™MS14 ,ERADD 7SET ERROR CODE 
000712 #1,EXFL :SET 3 CODE 
PC,.LTGERO ;GO PRINT ERROR 
33x: PC,ITER [GO SEE IF ITERATIONS 
002460 TSCD2 RETURN TO SCHED 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 


— SS Ss SS SS SS YS SS 
SSS SS SS SS SS Ss 
eT STN 
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C2TEAB.P1 15=NOV=78 SEQ 0072 
2732 
3733 [LOGIC TEST 34: PHASE ENCODED STATUS(PES) ##eenen 
2735 011310 012737 027343 000666 LT34: MOV #TMs ERADD :SET ERROR CODE 
2736 011316 012737 025712 000616 MOV LT34,EMADDR :SET TEST HEADER 
2737 011324 012700 000004 LT341T: MOV we RO 
2738 011330 737 016710 LT34A1: JSR PC; INIT3 7GO INIT, SELECT DRIVE+SLAVE 
2739 011334 042777 003400 167200 BIC #3400, aTC *SELECT NAZI 
2740 011342 052777 001400 167172 BIS #1400, aTC 
2741 011350 032777 000060 167144 LT36A: BIT #40,aDS i SEE IF PES=0 
2742 011356 001410 BEQ TSB F SO: BR 
2743 011360 012737 000002 000712 MOV #2, EXF “SET RCVD=NOT EXPT 
2744 011366 012737 011330 000706 MOV aT SeAT, SCOLP SET SCOPE ADDRESS 
2745 011374 737 015156 JSR PC ,LTGERO 'GO PRINT ERROR 
2746 011400 004737 016724 L734B: JSR PC, INITS 
2747 011404 032777 000040 167110 L134C: BIT #40, aDS i's s PES=1 
2748 011412 0010 BNE | T34X SIF SO: BR 
2749 011414 012737 011404 000706 MOV WLTSeC, SCOLP 3SET SCOPE ADDRESS 
2750 011422 012737 000001 000712 MOV #1,EXFL "SET EXPT-NOT RCVD FLAG 
2751 011430 004737 015156 JSR PC“LTGERO 'GO PRINT ERROR 
2752 011434 004737 016534 L134K: JSR PC. ITER ‘GO SEE IF ITERATION 
2753 011440 000137 002460 L134xx: JMP TS(D2 RE TURN TO SCHED 
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sLOGIC TEST 35: SLAVE ADDRESS CHANGE (SAC) *exxnennnse 


027753 000666 : #™MS37,ERADD 
000616 MO #MSLT35 EMADDR 
: PC, INITS zINIT SELECT DRIVE, SLAVE 
167030 18: B #20,aDS :SEE IF SDWN IS RESET 
[IF NOT: BR 


BN 
167040 2 SET FORMAT 
MOV #15 ,aMR SET WAM 3 
MOV 71,@ ;LOAD READ+GO 
167016 SEE IF SAC=0 
LT35A :1F SO: BR 
000712 #2,EXFL ZSET RCV-NOT EXPT FLAG 
000706 #LT35IT,SCOLP SET SCOPE ADDRESS 
PC,.LTGERO [GO PRINT ERROR 
oe ge tS : INIT 


I arc ; BUMP ay: © eee 
106756 #25000, atc ine IF S 


LT siF SO: aR 
011546 000706 MLT35A,SCOLP [SET SCOPE ADDRESS 
000001 000712 #1, EXFL SE EXPT-NCT RCVD FLAG 
015156 J PC,LTGERO :GO PRINT ERROR 
016534 3 PC, ITER 
002460 } TSCD2 RETURN TO SCHED 


ws 
ws 


PAVIA SISTA SIUIUTUITES SS ES i 


RLENSOKRRASTRVES 


top 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 


a ed ed ad ed ed 
2 SS SS SS SS SS SS SS SS SS SS SS ss Ss ss 


Oo 
—) 
ae) 
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sLOGIC TEST 36: FRAME COUNTER STATUS(FCS) **xxxxnnn 


026013 000616 LT36: #MSLT36,EMADDR 
027761 000666 MO #T™MS38 , ERADD 4H ERROR ‘sa* . 
‘ t - ° ° . + 


040000 166676 . #40000,aTC SEE IF FCS= 


1$ :1F_SO: BR 
011632 060706 So aests SCOLP :SET SCOPE ADDRESS 
000002 000712 #2,EXFL SET RCVD-NOT EXPT 
015156 <5 LTGERO :GO PRINT ERROR 

: INIT3 INIT 

ore WRITE TO FC 
166636 #40000, aTC SSEE IF FCS=1 
BN 736 


LT36X :1F SO: BR 
000706 . #1$, a SSET SCOPE ADDRESS 
000712 #1, EXF SET EXPT=NOT RCVD 
ay ‘LTGERO [GO PRINT ERROR 


002460 er TSCD2 :RETURN TO SCHED 


23 23 3333335455555 54545 
PS 
eae 


NIN 
an 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 


NNNNYNOO 
&R 


Whron— 
MANS 
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LOGIC TEST 37: ACCELERATION(ACCL) *eeannnnn 


L137: #MS! 137 ,EMADDR 
MO #™MS39, ERADD 3SET_ERROR CODE 
LT37I1T: PC, INITS : INIT, SELECT DRIVE+SLAVE 
Bl #30021 SET FORMAT 
arc SEE IF ACCL=1 
Sarl IF SO: BR 


1,EXF 
ait. SCOLP SET SCOPE ADDRESS 
PC ,LTGERO :GO PRINT ERROR 
PC’ INIT3 S INIT 
#300, arc :SET FORMAT 
#15,aMR SSET WAM 3 
#71.aC1 *LOAD READ+GO 
#100000,RO -SET ACCL DELAY 
arc ( IF 


T 
:$ E ACCL=0 
“Se F SO: BR 


pear ere Tw ad aad 

rrr mr 
YNNNNN 

a ie Ww 

NNONNN N 


S 


BN L137B ; DELAY 
000706 #LT37A,SCOLP :SET SCOPE ADDRESS 
000712 #2, EXFL 
PC,LTGERO :GO PRINT ERROR 


: PC. ITER 
002460 J TSCD2 RETURN TO SCHED 


3 
7 
7 
7 
7 
1 


WWW 
NNNNNW 
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sLOGIC TEST 40: PE TAPE MARK (TM) «exxannnnn 
LT40: MLT4OIT,SCOLP ;SET SCOPE ADDRESS 
MO #MSLT4O,EMADDR 
LT4OIT: J PC. INIT ZINIT, SELECT DRIVE+SLAVE 
1$: mr 
BNE 
166400 #3300, atc 
166364 Fan, ZSET WAM O 
166332 * 27,a SLOAD WRITE TAPE MARK+GO 
MOV #100000, RO :SET DELAY 
166332 : iSEE IF TM=1 
ny ‘IF 0: BR 
RO 
:DELAY 


DELAY FOR OPI RESET 


2$ 
027321 000666 #7MS3, ERADD 
000001 000712 #1, EXFL 

015156 PC: LTGERO :GO PRINT ERROR 
016534 Ox: PC’ ITER 

002460 TSCD2 ;RETURN TO SCHED 


VAVRSANSLRSAENSRVER 
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sLOGIC TEST 41: NRZ TAPE MARK (TM,VPE,1qM)**xaaexn«8 


01224 L141: _ WLTG1IT,SCOLP ;SET SCOPE ADDRESS 
02617 MO #NSLT41-EMADDR 
LT41IT: PC, INITS ZINIT, SELECT DRIVE . SLAVE 
B1 #1700, aTC ‘SET NRZ+NORMAL FORMAT 
4-20, aF C *SET FCS 

#7, aR :SET WAM 0 

#27, C1 LOAD “ORITE TAPE MARK+GO 


R 
166214 : #4 ,aDS SEE IF TM=1 
re: = :IF SO: BR 


i BN 1$ : DELAY 
027321 000666 #TMS3,,ERADD [SET ERROR CODE 
000001 000712 #1, EXFL 
015156 PC. LTGERO :GO PRINT ERROR 
002000 166162 2: #2000, aER SSEE IF ITM=1 
BNE 3 :IF SO: BR 

027564 000666 #TMS30. ERADD  :SET ERROR CODE 
000001 000712 #1, EXFL 

015156 PC; LTGERO :GO PRINT ERROR 
000100 166132 38: #100 ,@—R [SEE IF VPE=1 


[IF SO: BR 
027551 000666 aTMS28 ERADD  :SET ERROR CODE 
000001 000712 #1, 
015156 PC LTGERO :GO PRINT ERROR 
002100 ; #2100,R1 :SET EXPT ERROR BITS 
166076 ike: @ER,Re :GET ERROR REGISTER 
R1,R2 ‘SEE IF UNEXPECTED ERRORS 
LT41x ‘IF NOT: BR 
015144 PCL TGER3 TELSE PRINT ERROR 
; R ‘SET TIMER 
000200 166054 1$: #200, aDS ‘SEE IF DRY SET 
2$ [If SO: BR 
R2 AWAIT DRY 
1$ SDELA 
534 : PC, ITER 60 SEE IF ITERATIONS 


PC ,DRVCLR :GO_ DO DRIVE CLEAR 
TSCD2 :RETURN TO SCHED 


RN 
ao 


wioss 
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3 THE FOLLOWING tt TEST WILL REQUIRE TAPE MOVEMENT. EACH 
STEST WILL PERFORM A TAPE WRITE WHILE IN A PARITICULAR MAINTENANCE 
;MODE IN ORDER TO FORCE THE REMAINING ERROR CONDITIONS. 


sLOGIC TEST 42: CYCLIC REDUNDANCY ERROR(CRC) *xxxxeennn 


001700 : #1700, UDES 7SET UNIT DESCRIPTION = NRZ 
014760 J PC,S TANI C :GO SEE IF STATIC ONLY 
001000 4 ' #1000 


BN "S :PAUSE 
026242 000616 AMSLT42 ,EMADDR 
000706 MOV MLT42IT,SCOLP ;SET SCOPE ADDRESS 
LT42IT: a PC,IN IT INIT SELECT DRIVE+SLAVE 


;SET FC=20 
:SET BUS ADDRESS 
#7 ,aMR 7SET MM CODE 
165720 oT ~ ;LOAD WRITE+GO 
165722 : sSEE IF DRY=1 
BN LT42B ;IF SO: BR 


5752 


BN LT42A sDELA 
165710 : 7 SEE IF LRC ERROR ONLY 
BN LT42B1 :IF NOT: BR 
GET v2 CHAR 
MASK C 


RC 
2 SEE IF SETUP CRC IS CORRECT 
SELSE PRINT ERROR SETUP 
RETO SETUP ERROR MSG 

TO SCHED 


165624 


#21,aMR SET MM 
165572 ;LOAD WRITE+GO 


: C RQ 
165574 : SEE IF DRY 
BN LT42D ;1F SO: BR 


sAwAIT DRY 
SEE IF CRC=1 
SO: BR 


BM 4; bor : : 
000666 tp tf ERADD ;SET ERROR CODE 
000712 #1, EXFL 
PCs ;STGERO :GO PRINT ERROR 
#100200.R1 7SET EXPT ERROR BITS 
aER Re 


7GET ERROR REGISTER 
:SEE iF UNEXPECTED ERRORS 
iF NOT: BR 


. 
es 


S235 

—) ad 

ENRVS 
OOO00—]WWW- NV 
MOMMY - 90 NNN WON 


—-OoOwnrnr 
*+- vw 
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S285 
OW 
rn ror 
NNN 

Ww 


agges 


WWININWWNNWNWNWAINWAIN NANNY 


IN'NWWWGW 
MOMINPNNININ 
—_— 

RARE 


2945 
2946 
2947 
2948 
2949 
2950 
2951 
295 

295 

2955 
2957 
2958 
2959 
2961 
2965 
2964 
2965 
2966 
2967 
2968 
2969 
2970 
2971 
2972 
2975 
2974 
2975 
2976 
2977 
2978 
2981 
2983 
2985 
2987 
2989 
2991 
2992 


I 
710 
015144 
0 


16534 
915624 
2460 


000200 
027535 
000001 
015156 
165332 
000177 
157600 


023011 


MACY11 


165510 
000772 


000706 
000616 


165364 


165352 


000666 
000712 


000666 
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LT42x: 


MO 
LT43IT: 

C 
1$: 


LT43x: 
JSR 
LT43XxX: JMP 


PC,.LTGER3 
PC, ITER 


PC DRVCLR 
TSCD2 


LT43E 

#TMS26 ,ERADD 

#1, EXFL 

PC. LTGERO 
LT43x 


#177 ,R2 
#157600,R1 
R1,R2 


LT43F 
AMSG53,ERADD 
PC,LTGER1 
@ER ,R2 


R 
#200,R1 
R1,Re 
LT43x 
PC,LTGER3 
PC° ITER 
PC-DRVCLR 
TSCD2 


Ae PRINT ERROR 
O ITERATIONS 


RETURN TO SCHED 
sLOGIC TEST 43: LONGITUALINAL REDUNDANCY (LRC) s**aannwen 


50s BRANCH IF NOT A TE16 


SET UNIT atic oan NRZ 


7GO SEE IF STATIC ONL 
;SET SCOPE ADDRESS 


INIT, SELECT DRIVE+SLAVE 


;SET BA 

;LOAD WRITE+GO 
;SEE IF DRY 

;IF SO: BR 
;AWAIT DRY 

sSEE IF LRC=1 

; O: BR 

:SET ERROR CODE 
:GO PRINT 


MASK _LRC 
:SET EXPT LRC 


E IF EXPT = RCVD 


:1F SO: BR 

SET ERROR CODE 
PRINT ERROR 

:GET ERROR REGISTER 


;SET EXPT ERROR BITS 
:SEE IF UNEXPECTED ERRORS 


IF BR 
SELSE PRINT ERROR 


RETURN TO SCHED 
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sLOGIC TEST 44: PE CORRECTABLE DATA (CORR) **«eaxennns 


L144: #2300 ,,UDES ;SET UNIT DESRIPTION = PE 
J PC,STATIC ;GO SEE IF STATIC ONLY 
WMSLT44,EMADDR ;SET HEADER 
MO MLT44IT,SCOLP ;SET SCOP 
LT44IT: PC, INIT 3GO INITIALIZE 
MO sSET WC=200 
sSET FC=400 
;SET BA=START OF WRITE BUFFER 
;LOAD WRITE AND GO 


C 
165142 LT44A: aFC SEE IF FC=0 
B ;I1F SO:BR 


S2 
= 
N 
NNN 

IAG 


oo 
=b od 
mr 
N 


S23298 

ond and and ax 

wrorororo 
ina 


BN sAWAIT FC=0 
000021 LT44A1: 1 4 SET MAINT MODE 
000200 LT44B: SEE IF DRY 

BN ;IF SO :BR 


BN ;AWAIT DRY 
165112 LT44C: @ER ;SEE IF CORR=1 


LT44D :1F SO: BR 
027736 ATMS35 ,ERADD sELSE SET ERROR CODE 
000001 #1 ,EXFL SET EXPT FLAG 
015156 fd PC,LTGERO :GO PRINT ERROR 


000002 : CMPB SEE IF DEAD TRACK BIT 1 
4G :1F SO: BR 

165056 acc,R ELSE SAVE RECVD 

177000 MASK OUT CRC 

000002 MOVB E EXPT 


#2,R 7 SAV 
022420 AMSG42,ERADD SET ERROR CODE 
016272 gs 1 gee :GO PRINT ERROR 


:GET ERROR REGISTER 
:SET EXPT ERROR BITS 
:SEE_IF EXPT=RCVD 
SIF SO: BR 


PC,LTGER3 ELSE PRINT ERROR 
PC,ITER :GO SEE IF ITERATIONS 
PC,DRVCLR :GO_DO DRIVE CLEAR 
TSCD2 RETURN TO SCHED 


LT44X: 
JSR 
LT44XX: JMP 
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sLOGIC TEST 45: PE INCORRECTABLE DATACINC) **xxxxxeee 


L145: V ;SET UNIT DESCRIPTION = PE 
J i¢ 'GO SEE IF STATIC ONLY 


geese 


MOV 
LT45IT: PC, INI INIT SELECT DRIVE SLAVE 
MO SET wC=200 
SET FC=400 
164706 7SET BA=START OF WRITE BUFFER 
164674 : ‘0 ;LOAD WRITE+GO 
164674 LT45E: aFC sAWAIT FC=0 


lolelele} 
aol ant antl anil 


eS SS SS SS 
Vw 


jololelelelolelelelolelelo) 


SMO 


BN sAWAIT FC=0 
000023 164676 LT45E1: ‘ : 7 SET MAINT CODE 


L 0 
000200 164654 LT45A: SEE IF DRY IS SET 
BNE LT45B IF SO: BR 


esses 
RE 
ssa 


BNE LT45A sAWAIT DRY 
000100 164642 LI45B: [SEE IF INC=1 
BN T45D 


L :IF SO:BR 
027513 000666 #™MS23,ERADD SET ERROR CODE 
000001 000712 MOV #1, EXFL 

ate ,~LTGERO G0 PRINT ERROR 

#1 79000.R2 

#46,R1 


EXPT CK 
R1,R2 “SEE IF EXPT = RCVD 
;IF SO: BR 


LT45F 
000666 4MSG54,, ERADD 
PC, LTGER1 ZELSE GO PRINT ERROR 
@ER,R2 
#120600 ,R2 ;MASK OPI ,NSG, CORR, AND PEF 
#100,R1 ‘SET EXPT ERROR BITS 
Re ‘SEE IF UNEXPECTED ERRORS 
LT45X : NOT: 
PC,LTGER3 SELSE PRINT ERROR 
PC. ITER 


LT45xX: 
0137 JSR PC,DRVCLR 
013772 902460 LT45XX: JMP TSCD2 ;RETURN TO SCHED 
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;LOGIC TEST 46: PE FORMAT ERROR(PEF ,NSG) **eeaannne 


LT46: de F we SET UNIT DESCRIPTION = PE 
J ATIC :60 SEE IF STATIC ONLY 
WML Te6. EMADDR ;SET HEADER 
MO #LT461T,SCOLP :SET SCOPE ADDRESS 
LT46IT: rk INIT ITIALIZE 


c=20 
SET BA=START OF WRITE BUFFER 
164430 MOV nh ac ;LOAD WRITE+GO 


BN’ LT46A sAWAIT FC=0 
164440 ; fH at TAPE TO START WRITEING POSTAMBLE 


164430 ' 


164420 SET MM CODE TO KILL PEF 
R : INIT TIMING LOOP 
164376 ; 7SEE IF DRY SET 
LT46C IF SO: BR 


BNE LT468 WAIT DRY 
164364 : ‘See IF PEF SET 
14 0: BR 


L il 
027527 000666 hy tH ERADD [SET ERROR TAG 
000001 000712 #1 ,EXFL SET EXPT FLAG 
015156 Js Ciao [GO PRINT ERROR 


164334 : MOV :GET ERROR REGISTER 
120100 ote 6100.2 [+4+B CLEAR CRC,OPI & INC BITS (MAY OR MAY NOT SET) 
000600 #600,R1 '++B SET EXPT ERROR BITS (NSG + PEF) 

000004 164330 #4, ADT :+#B BRANCH IF TE16 


++B 
000400 #400,R1 :++B TU77 SHOULD NOT SET NSG BIT 
1$: R1,R2 [SEE IF UNEXPECTED ERRORS 


LT46Xx :1F NOT: BR 
015144 J PC,LTGER3 ELSE PRINT ERROR 
LT46X: PC, ITER 
J PC ,DRVCLR 
002460 LT46XX: TSCD2 RETURN TO SCHED 


100 
101 
102 
103 
104 
105 
106 
107 
108 
109 
110 
111 
112 
113 
114 
115 
116 
117 
118 
119 
120 
121 
122 


3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
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a0 
NING 
a4 


SEQ 0083 


sLOGIC TEST 47: FRAME COUNT OVERFLOW(M8905~YB) s««««x« 


926530 1 : SET TEST HEADER 
0 MO :SET SCOPE ADDRESS 
: ;GO_INIT 


S25 
aad atl 


; 20 
SET TO NRZ, NORMAL, ODD 
SET BUS ADDRESS 


3 WRAP 2 
;LOAD WRITE+GO 
;SEE IF ALPHA 
3IF SO: BR 


sAWAIT ALPHA 
:SET CLK CNT 


CLOCK MR 
:1F NOT DONE ALL: BR 


SET TEST wORD 
sSEE IF EXPT = RCVD 
;1F SO: BR 


LT47X ; : 
021673 000666 4#MSG19,ERADD SET ERROR CODE 
000712 #1,EXFL SET EXPT FLAG 
PC,LTGER1 :GO PRINT ERROR 
PC, ITER :GO_ SEE IF ITERATIONS 
002460 TSCD2 RETURN TO SCHEDULAR 


S 
ron 
SNSSAE 
g2eececoee 
a | 


RESSRRE LESS 


Tw 
NM 


SF 


164124 


W 
N 
ia¥) 


UNUSSEREGROASS SUISUN UENONY & 
WW 
an 


3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 


St = = = 2 = 2 SS) os SS 2 = SS 2 2 3 2 2) 2 2) 2) 2 2 


ONO ES ESB ERE ERR EW 
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a0 
NIN 
a4 
mm 


a 


;LOGIC TEST 50: NEF WHEN WRITING PE ON NRZ SELECTED SLAVE 


LTS50: #MSLTSO,EMADDR ;SET ERROR POINTER FOR STANDARD 
#LTSOIT.SCOLP 
LTSOIT: J! PC, INIT3 zSET SLAVE = NRZ 
BI SCLEAR DENSITY BITS 
[SET DENSITY = PE 


RSSS 
MoNMONNNONPO 
NNN 
NNN ~N 
~N 
esccs 
NN -S 
SAOSSSSORS 


SET D COUNT 

;SET FRAME COUNT 

;SET BUS ADDRESS 
#13, : WRAP 2 
#61,aC1 ;LOAD WRITE COMMAND 


3 
oo—-— 
one~ws 


lelelelelele) 
S ~N 
N 
— 


SSRISASALISSSNKUL B 
a5 


PANPNZSSNE 


004000 : #4000,R1 :SET EXPECTED RESULT 
163764 : @ER,R2 :GET ERROR REGISTER 
RI .R2 “BRANCH IF NEF BIT SET 


#1,EXFL SET EXPECTED FLAG 

“— PRINT ERRCR 

L 

R1,R2 BRANCH IF NO UNEXPECTED ERROR 
RE SET 


LT50Xx 
015144 J PC,LTGERS3 
PC,ITER 


PC DRVCLR 
002460 TSCD2 


a ed ed ed ed od wd od 
—_ 


WNNNNWAAAAAWNANAWAWA 


Sx 
= 
oO 


“N 
MN 
oO 
secs 
aad aad 
= 


000001 
015156 
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sLOGIC TEST 51: NEF WHEN WRITING NRZ ON PE SELECTED SLAVE 


000616 LT51: #MSLTS1,EMADDR ;+SET ERROR POINTER FOR STANDARD CONF. 
0007 MO MLT511IT,SCOLP ;SET SCOPE LOOP ADDRS. 
LTS1IT: : 


oOo 


:SET SLAVE = PE 
CLEAR DENSITY BITS 
:SET DENSITY = _NRZ 
SET WORD COUNT 
SET FRAME COUNT 
:SET BUS ADDRESS 

: WRAP 2 


. 7 SET 
#61,aC1 SET WRITE COMMAND AND GO 


Ok ed ed ed ed ed od ot et os |COPTUET 
lolelelelel=a) 


BELKSRESLSSELRA & 
R 


004000 #4000,R1 :SET EXPECTED RESULT 
163610 @ER,R2 =GET ERROR REGISTER 
R1.R2 ‘BRANCH IF NEF SET 


000712 #1, EXFL sSET EXPECTED FLAG 
* _—— PRINT ERRCR MSG 


5) 

R1,R2 ;BRANCH IF NO UNEXPECTED 
LT51x TERROR BITS WERE SET 

015144 J PC,LTGER3 

PC- ITER :+ITERATE TEST 


016534 ‘ 
PC,DRVCLR CLEAR DRIVE 
014754 TSCD2 RETURN TO SCHEDULER 


eee 


Sauer 


000001 
015156 


32 
32 
32 
32 


—_ 4 3 2d 
WwnN-o 
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014760 
001006 


002460 
001002 


7 
MACY11 30A(1052) 21=DEC-78 13:08 PAGE 86 


STATIC: 


STFLG 
1$ 
STATC 
1$ 


(SP) + 
TSCD2 
RDRVF 
PC 


sSTATIC TESTS ONLY SUBROUTINE ***xn00% 
+SEE IF SINGLE TEST ONLY 


SO: BR 
SEE IF STATIC ONLY 
i mo 


TRESET § TACK 
;RETURN TO SCHEDULAR 


RETURN TO TEST 
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:END OF RECORD FORCE SUBROUTINE***** 


163520 : MOV aR ,RO :GET MAINT REG 
000036 BIC #36 RO CLEAR CURRENT OP CODE 
BIS #24 ,RO :SET _EOR CLEAR oP _OP CODE 


5350! —~2D6-£OR- 
000037 163476 ° #37. a0R [CLEAR EOR AND MM 
000002 MO #2,R1 
000001 163436 EORP1: #1.aC1 :SEE IF GO GONE 

B EORPC ‘IF SO: BR 


_ sAWAIT GO RESET 





RES 


EORP1 
163476 #20000, aSWR ase IF ERROR PRINT INHIBIT 
* EORP2 F SO: BR 
SEE IF DONE HEADER 
;IF SO: BR 


as 
nM 


e 


;PRINT HEADER 


J PC, TTOUT :PRINT ER go BIT ERROR 
163440 #100000,aSWR § :SEE IF HALT ON ERROR 
EORP2 SIF NOT: BR 


lelelelelelelelelelelolelelo) 
Walvabeabeabealeabeslealealealealealegleal 


aed and aed lh an anh antl and ant aan ed 
ad aad 
SENSNAVEVS 


Ss 
~m 


000672 : TEMP2 :CLEAR FLAG 
PC RE TURN 


Kk 7 
CZTEABO TMO3-TE16/TU77 ch I MACY11 30A(1052) 21-DEC-78 13:08 PAGE 88 
CZTEAB.P11 1S-NOV-78 13:10 


LOGIC TEST ADDRESSING ERROR SUBROUTINE ***xxaaen 
900712 LTGERS: EXFL 
022762 000666 MOV #MSG51, ERADD 
000001 000742 LTGERO: — 1,ADDFL SET NO ADDRESS FLAG 


LTGER: 
000662 PFLG ;CLEAR PRINT FLAG 
020000 163370 We : SEE a SHOULD PRINT 


BNE :1F NOT: BR 
000614 LTGA: 7SEE IF PRINTED HEADER 
BNE LTGA IF SO: BR 
000616 
017662 J sPRINT TEST HEADER 
000001 : :SET HEADER FLAG 
000666 
017662 j :PRINT CONDITION ERROR 
000742 ADDFL 
020010 J PRINT ADDRESS 
000712 : EXFL 
IF NO STATUS: BR 
AMS 
000712 | sEXPT-NOT RCVD 


LTGB 
021272 P sRCVD-NOT EXPT 
017662 ; PRINT STATUS 
000662 : 


000742 ‘ :SEE IF ADD TST 


021253 
000001 


; SO: 
000740 sSEE 1F TEST 24 
NOT: BR 


030376 P 
017662 PRINT DATA TAG 
:PRINT EXPT TAG 
PRINT EXPT 
tT . RCVD TAG 
[GET RCVD 
J SPRINT RCVD 

0 LTGCO: PC °REGP ‘PRINT REGISTERS 

000 163164 LTGD: 
021644 
SPRINT ITERATION 


10 
163136 
:1F NOT STOP ON ERROR: BR 


000662 


L TGXX 1f PRINTED: BR 
020000 163116 oy p00 Sue 
L 
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331 
331 
3314 


$ o1 a oer: 005037 
460 Bangs 


vw 
~~ 
EVRVAVEVAN 


wi 
nee 
~ 


015622 


022605 
017662 
163002 
020000 
162774 
020000 
162766 
020000 
162760 
020000 
162752 
020000 
162744 
020000 
162736 
020000 
162730 
020000 
162726 
020000 


162724 
020000 
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LTGXX: 


CLR ADDFL 
C EXFL 
SCOPE 


CLEAR ADDRESS FLAG 


; SUBROUTINE TO PRINT MAJOR REGISTERS***exxxann 


ee 


arc,R 
PC,OCTPE 
PC 


" sPRINT REGISTER HEADER 


sPRINT REGISTERS 





CZ TEABO aati Pa tak A I 


CZTEAB.P11 


015624 


015744 
015746 
0 


15=NOV=7: 


13:10 


040000 


000662 
016060 
000011 


000200 


040000 
162616 
162606 


000001 
000620 


162564 


000662 
162546 


000662 
020000 


015624 
016504 


MACY11 30A(1052) 


DRVCLR: 
DCD: 


162634 
162636 DCA: 


162622 DCA0: 


162612 


162526 


000706 


M 7 
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sDRIVE CLEAR SUBROUTINE***xtaenne 


#40000,R4 
R4 

DCD 

PFLG 
PC,ATIN 
wit. act 
#200, aDS 
DCAD 


DCA 
#40000 ,aDS 
DCE 


DCEXX 
#20000 ,aSwR 
DCE 


ADRVCLR,SCO!P 
SCOPE 





:DELAY 


:GO SEE OF ATTN SET 
ISSUE DRIVE CLEAR 


SEE IF DRY 





WAIT FOR D 
“SEE IF ERR. RESET 
7 IF NOT: BR 
SEE IF ERROR REGISTER RESET 
: SEE IF ATA RESET 
F NOT: BR 


SET TEST BIT 
:GET DRIVE NUMBER & BRANCH 


F_DR 
:POSITION TEST BIT PER DRIVE NUMBER 
SEE IF DONE 


71F NOT: BR 

:SEE IF ATTEN IS RESET 
:IF NOT: BR 

;RETURN 


;SEE IF ERROR PRINT INHIBIT 
:1F SO: BR 

7 SEE ule _PRINT HEADER 

; IF : BR 


;PRINT HEADER 


;PRINT DRIVE CLEAR ERROR 
‘PRINT REGISTERS 

;SET PRINTED FLAG 

[SEE IF HALT ON ERROR 

IF NOT: BR 


SEE IF HAVE PRINTED 
:1F SO: BR 


BRANCH IF ERROR 
PRINTOUT DESIRED 


SET SCOPE LOOP ADDRESS 
:GO DO SCOPE LOOP 


N 7 
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;COMPOSITE ERROR CHECK SUBROUTINE ***««aann% 


Eee 


: NOP 
162434 T ads ;SEE IF ATA SET 
. ATTA : IF SO: BR 
022247 000674 #MSG32, TEMPS 
BR ATTP sELSE PRINT ERROR 
040000 162414 : #40000 .,aDS ;SEE IF COMPOSITE ERROR SET 
BN ATTB ;IF SO: BR 
022231 000674 


3S 


EYRSASKSAS 


ELSE PRINT ERROR 
:SET TEST BIT 


GET DRIVE NUMBER & BRANCH 
:1F DRIVE 0 

:POSITION TEST BIT 

s SEE IF DONE 


000001 
022265 000674 
000620 


pk aed aD aD ad at a cd od ad od od od 
AARARAAAAAO 
col a aa al cal cal cad en al 


jelelelelelelelelelelelelelelo) 
a 
oO 


a 
oO 
— 
Nm 


BN F NOT: BR 
162354 : SEE IF ATTEN SUMMARY SET 
ATTP F NOT: BR 


PC TELSE RETURN 
020000 162404 : ry) a SEE _IF PRINT INHIBIT 


BN : : 
000614 SEE _IF DONE HEADER 
;1F SO: BR 


000616 
017662 J PRINT HEADER 
000674 


017662 ad : ;PRINT ERROR TYPE 
015470 ;PRINT REGISTERS 
000662 PF(G 


000614 IN : L 
162334 : >SEE IF HALT ON ERROR 
; BP ;1F NOT: BR 


— SS SS YS YS 4 oo 


EEKEKELE LE LER ELEY 
SSoNanRWv=o R 


HA 
000662 : A ares IF DONE PRINT 
BN BR 


ATTXX 
020000 162314 #20000 ,aSwR ‘BRANCH IF NO ERROR 
BE ATTP sPRINTOUT DESIRED 
000662 : PFLG [CLEAR PRINT FLAG 
016262 0207 RT PC ;RETURN 
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LOGIC TEST REGISTER BIT ERROR SUBROUTI INE***s«xex0% 
000001 000732 LIGER2: #1 ,PEXFL 7SET FLAG 
LTGER1: NOP 
000662 C PFLG CLEAR PRINT FLAG 
020000 162262 ;BRANCH IF ERR 
BNE LTG1X 


PRINTOUT DESIRED 
000614 LTGIA: ;SEE IF PRINT HEADER 
BNE IF NOT: BR 


EERE 
EEE Sous 


Oo 


eer 
2 


WR —ODOnNOW 


000616 
017662 J PRINT HEADER 
000001 LTG1B: 7SET FLAG 

MO ERADD ,R4& 


000666 

017662 PRINT ERROR CODE 
000732 SEE IF PRINT EXPT-RCVD 
;1F NOT: BR 


oo 
nb ond 
Wr 
“N 


021573 
017662 :PRINT EXPT TAG 
R1,R3 


:PRINT EXPT 
:PRINT RCVD TAG 
:PRINT RCVD 


MMI 
gogss 

Neu 
SN N 
Ww 


REREREE ERY 
bARGP, Atwtb 4 
ooo 
Eke 
Ww 


w 
o 


162154 


3460 
3461 
3462 
3465 
3464 


PRINT ITERATION 
162120 
a : IF NOT STOP ON ERROR: BR 
000662 LTG1X1: 
BN LTG1XX 
020000 162100 #20000 ,aSwR 
LTGIA 


B 
LTGIXX: 
000732 C PEXFL :CLEAR EXPT-RCVD FLAG 
016504 SCOPE :GO TO SCOPE 


7; IF HAVE PRINTED: BR 


:SCOPE LOOP ON ERROR SUBROUTINE *®*kxxxxnn® 
162054 #40000,aSWR ;SEE IF LOOP ON ERROR 
BN 1$ :IF SO: BR 
PC ZELSE EXIT 
(SP) + sRESET STACK 


lelelejleleleleja) =) 
— 3 9 4 9 2 2 9) 
My Ny ye A My 


162152 a@oCOLP ;LOOP ON ERROR 
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sTEST ITERATION SUBROUTINE ***seaxea 

004000 162026 ITER: 4) #4000 ,aSwP 7 SEE IF ITERATIONS 
000676 1$: aad :CLEAR, | a COUNTER 
001014 2$: "ae :NO SUBTEST ITERATIONS ON FIRST PASS 
000676 ITCNT ;BUMP COUNTER 
000676 MP ITCNT,ITAMT 4 IF DONE ALL 

1$ O: BR 

(SP)+ RESET STACK 
162106 @ITRLP,RO SET ITERATION POINTER 

(RO) :GO ITERATE 


INTERVENTION INHIBI T***xx%««% 


022435 : 4MSG43,R4 
017662 PC, TTOUT :GO PRINT INHIB MSG 


002460 MP TSCD2 RETURN TO SCHED 


NON-STANDARD MODE TEST HANDLER 


RO,~(SP) 3+SAVE RO 
000240 #240,R0 7+SET UP INDEX 
001326 001056 - ino -TSTTBL(RO) ;+ 


000047 001330 #47 ,TLAST ;+SET END OF TEST 
001330 001056 MLAS. TSTTBL(RC)* 3+SET LAST TEST NUMBER 
MOV (SP)+,RO ;+RESTORE RO 
PC ; +RETURN 


35 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 
3 


MIM AIT 
DONO RPUIAIODS 
WDONAULRWIR Oo 
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s INITIALIZE SUBROUTINE ***axexnne 


INIT1: 
161626 MO #40,aCS : INIT 
161620 INIT2: SELECT DRIVE 
161634 MO SLVN,@TC SELECT SLAVE 
;RETURN 


ROUTINES TO rus ena SLAVE. THESE ROUTINES PLACE THE SLAVE 
; IN PROPER Bily ATU. 3 FOR THE CALLI 

:NRZ MODE AND OFF BOT; P E AND OFF 

;BOT. IF THE SLAVE IS IN THE PROPER STATUS ON ENTRY NO ACTION IS TAKEN. 


;SET_SLAVE IN NRZ OFF BOT 
016710 000772 __  INIT3: MOV UDES ;SAVE TEST’S UNIT DESCRIPTION 
016714 001400 000772 MOV 06, SET UNIT DESCRIPTION = NRZ 
016722 000410 NITS :GO TO INITS ROUTINE 


SET SLAVE IN PE OFF BOT 
016724 013746 000772 INIT4: MOV UDES,~(SP) :SAVE TEST'S UNIT DESRIPTION 
016730 012737 000772 MOV #2000, UDES SET UNIT DESRIPTION = PE 
016736 000402 BR INIT5 :GO DO IT 


THIS ROUTINE IS ENTERED AT INIT WHEN THE CALLER HAS SETUP UDcS. 
:1T IS ENTERED AT INIT5 — dg INIT3 OR INIT4 HAS SET UP UDES. 
016740 013746 INIT MOV UDES ,=(SP SAVE TEST'S UNIT DESRIPTION 
000040 INI 15: #40,aCS ROLLER 


“GET SLAVE DESCRIPTION 
:CLEAR ALL BUT DENSITY SELECT BITS 
#1400, (SP)+ :BRANCH IF REQUESTING PE MODE 


1$ 
161510 440,aDS ;BRANCH IF SLAVE IS IN NRZ MODE 
4$ PES = 0) 


BR 2$ 
161476 $ Pa BRANCH IF SLAVE IS IN PE MODE 


161454 2$: MOV #7,aC1 :REWIND SLAVE 
161460 : 1 #200, aDS ‘WAIT FOR READY 


161450 : ot #20000 ,aDs WAIT UNTIL PIP CLEARS 


161460 : UDES ,aTC LOAD SLAVE DESRIPTION 
161432 #2,aDS BRANCH IF NOT AT BOT 


161410 #25,aC1 ;ERASE TO GET OFF BOT 
161414 : #200, aps ‘WAIT FOR READY 


161404 : #6008 WAIT FOR SETTLEDOWN TO CLEAR 
161362 #11 ,aCi sRESET DRIVE 


000011 
000772 (SP)+,UDES RESTORE UNIT DESRIPTION 
000207 Pe 7RE TURN 
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MANUAL INSTRUCTION SUBROUTINE ****eeean® 


: NOP 

017662 J ;PRINT INSTRUCTION 
026740 AMMSGO RS 
017662 ;PRINT REPLY 
000674 
900001 
177777 
000000 #0,R3 
017340 PC,TIR sAWAIT REPLY 

NOP 

PC sEXIT 

7MAG TAPE INTERRUPT HANDLER*®**%%2e8 08 

NOP 
172 MOV RTRN, (SP) ;SET RETURN FROM INTERUPT ADDRESS 
017210 000002 RT] sRETURN 

ZTTY INTERRUPT HANDLER****xaewwn 
017212 017746 161356 $ V @TKB,-(SP) ;GET CHARACTER 
716 000200 B #200, (SP) :CLEAR PARITY BIT 

000003 a #3, (SP) ‘BRANCH IF NOT CONTROL C 
001420 lt S INHIBIT “*C IF IN CHAIN MODE 
161324 CL aPSwW sCLEAR PSW 


000200 MP a#200 sRESTART 
000001 : #1, (SP) ;BRANCH IF NOT “A 


2s 
000176 000570 ASWREG , SWR s;BRANCH IF USING HARWARE SWR 
de 34 000576 #1 tak" ae ; INVOKE HARDWARE SWR 


:SAVE REGISTERS ON THE STACK 
: TYPE "HARDWARE SWR IN USE‘ 


ed cael cae cae cd ce ach ed cd 
a 


leleleleleleleleleleleo) 


Bebor 


3610 
3611 
3612 
3613 
3614 
3615 
3616 
3617 
3618 
3619 
0 
1 


a 


— 
Nm 


:;BRANCH IF NOT “G 


4$ 
000176 000570 : : INVOKE SOFTWARE SWR 
0204 36 PC,GTSW :GET SWITCHES 
: ;POP _ EAAPACTER OFF STACK 


33 


3 
\OoO~N 
83g°8 
SoRSh 


017336 


RR 
ze 
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332 RRA RE 


3635 sTTY ENTRY SUBROUTINE : 
3634 


ITHIS SUBROUTINE IS USED BY THE TEST CONDITION 
SENTRY ROUTINE TO READ THE RESPONSE iv me 


L 
BE TYPED_IN OCTAL 

; MUST FALL WITHIN THE LIMITS SET BY 
:THE CALLING ROUTINE. 
7 IF AN ENTRY IS ILLEGAL OR OUTSIDE THE LIMITS, 
A QUESTION cone IS TYPED (?) AND THE RESPONSE 
:MAY BE REENTERED. 
a unas MAY NOT EXCEED SIX (6) CHARACTERS AND 

Y BE TERMINATED AT LESS THAN SIX BY TYPING A 
‘CARRIAGE RETURN 


FREER REE EERE EERE EERE EERE EEE 


010146 : R1,~(SP) SAVE CHARACTER COUNT 
011601 3 (SP) ,R1 RESTORE CHARACTER COUNT (FOR “U) 
005037 000670 TEMP) CLEAR FIRST CHARACTER FLAG 


RO 
017620 1$: PC,TTIN :GO READ CHARACTER 
000003 000612 aed BRANCH IF NOT “C 
sRESET 
000200 MP a#200 RESTART PROGRAM 
000015 000612 : #15,TIB SEE IF CR 
2$ :1F NOT: BR 
000670 TEMP1 :SEE IF FIRST CHARACTER 
9$ IF SO: BR 


BR 6$ 
000025 000612 2 St Tl ;BRANCH IF NOT CONTROL U 
023360 s TYPE <CR><LF> 
017662 


10$ 
000177 : ss ;BRANCH IF NOT ‘RUBOUT' 
REMOVE LAST CHAR 


5 RO 
023362 sTYPE '"\" 
017662 
4 :DECREMENT CHARS RECEIVED COUNT 
000060 000612 : MPR v6 <SEE IF F CHAR 1S LESS THAN O 
4 


:1F NOT: 
017600 i ZELSE GO TO ERROR 
000070 000612 : 4A 7 SEE i = IS GREATER THAN 7 


:1F NO 
017600 :ELSE GO TO ERROR 
000670 : ;SET FIRST CHARACTER FLAG 


SHIFT 3 LEFT 
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5=NOV~7 
042737 177770 000612 
053700 000612 


017600 
017600 


017576 000207 


#177770,T1B 
TIB,RO 


1$ 
RO,R2 
7$ 
TINER 
R3,RO 
8$ 


TINER 
RO, (R5) 
(SP) + 
PC 


: STRIP ASCII 

;LOAD CHARACTER 

See IF DONE 
NOT: BR 

:SEE IF EXCEEDED MAXIMUM LIMIT 
NOT: BR 


ELSE GO TO ERROR 
;SEE IF BELOW MINIMUM LIMIT 


IF NOT: BR 

SELSE GO TO ERROR 

[LOAD VALUE 

:POP CHAR COUNT OFF STACK 
EXIT 
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CZTEAB.P11 15=NOV-78 15:10 
i TTY ENTRY ERROR SUBROUTINE ***aexanne 
022375 : MOV #MSG40 ,R4 
017662 J P :PRINT? 
:POP_CHAR COUNT OFF STACK 
16 000020 [RESET SP TO START OF VALUE ROUTINE 
017616 S PC REDO VALUE ENTRY 
i TTY READ SUBROUTINE ****xeeewe 


017620 2 160746 
160742 


160736 
000200 :STRIP PARITY BIT 
000612 TIB VE CHAR TO TTY OUTPUT BFR 
017762 P "AND ECHO IT 
OUTPUT SUBROUTINE ***sennnnnne 


000610 : (R4)+,T0B 
000043 C 43,7 


000045 000610 
017762 
000610 


000015 
017762 
000004 
000610 
017762 


:DO FILLERS 
000012 
017762 
160610 
000610 160602 


000001 020230 OCTPE: 


020230 OCTP: ot FLAG FOR LEADING ZERO 
OCTPE1: SEE IF NUMBER IS ZERO 
BN :1F NOT ZERO: BR 
020230 : FL Fee a —— ALL 0 


OC TPO 
020210 ‘ TELSE PRINT ZERO 
OcTP sSPACE AND EXIT 
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CZTEAB.P11 


020230 


15-NOV=78 13:10 
100000 


900001 
020166 


020166 


020166 


020166 
020166 


020166 


020166 
000240 
017762 


177770 
020230 


020230 
000260 
000610 
017762 
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OCTPO: 


000610 OCTP3: 


OCTPG: 


OCTPGO: 
OCTPG1: 


BIT 
BEQ 


#100000 ,R4 
OCTP1 


PC, TOG 
PC 


#177770,R4 
GO 


sSEE IF MSD = 1 
;1F NOT: BR 


;PRINT 1 


sPRINT 0 


POSITION DIGIT 


sPRINT DIGIT 2 


:PRINT DIGIT 3 


PRINT DIGIT 4 


:PRINT DIGIT 5 
:PRINT SPACE 
EXIT 


FIRST CHAR FLAG 
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012704 
110337 
105777 

132737 

04 


13:10 


000010 
000610 
160330 


000200 


000061 


000060 
000610 


000674 
020232 
000674 
020232 


020412 


020412 


020412 
020412 
000260 
177760 
000610 
017762 
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:DATA CHARACTER OUTPUT SUBROUTINE ***axxnannn 


DOUT: MOV 
MOVB 
1$: TSTB 


— ON sects 
000610 BITB 
BEQ 


160312 

160302 MO 
ASL 
DEC 
BNE 
RTS 

DOUTD: MOV 
SWAB 


000610 SNPG: 


#10,R4 SET NUMBER TO PRINT 
aTPS 
1$. 


#200, TOB Tigidee | 


lis oR3 
PC,DOUT 
TEMS 


:GET FIRST DIGIT 
:PRINT 


:Gt: SECOND DIGIT 
PRINT 


PRINT THIRD DIGIT 
PRINT FOURTH DIGIT 
sEXIT 


Re TUR 


SEQ 0100 
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15=NOV-78 13: 


CZTEAB.P11 


07 
020714 


022737 


052117 


10 


000176 
020534 


000000 
017340 
020556 


MONMMNMOWMOO 
Mm-OVNNo-uM 
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SEQ 0101 


sROUTINE TO LOAD CONTENTS OF SOFTWARE SWITCH REGISTER. 
IF a CONTROL G (*G) IS TYPED THE SOFTWARE SWITCH ne Nee IS LOADED 
000570 GTSWR: CMP ASWREG , SWR :BRANCH IF SOFTWARE S 
BNE 1$ T_INVOKED 


ZSAVE REGISTERS ON THE STACK 
:TYPE *SWR = ' 
GET CURRENT VALUE 
sAND TYPE IT 
sASK FOR NEW VALUE 
NEW VALUE _WILL BE RETURNED IN (R5) 
LIMIT TO 7 CHARACTERS 
LIMIT RESPONSE TO BETWEEN 
30 AND 177777 
PC,TIR :GET_ RESPONSE 
PC, .RESTORE ;RESTORE REGISTERS 
1$: RTS RETURN TO CALLER 
ca tae TO SAVE ao ON THE STACK 
AVE: MOV %5.~<SP) 


24, ~(SP) 
%3,-(SP) 
%2.-(SP) 
%1,~-(SP) 
%0,-(SP) 
14(SP) ,=(SP) 
PC { URETURN TO CALLER 


ROUTINE TO eS oitieh SAVED ON THE STACK 
oe SP) +,14(SP) :-STORE RETURN PC ON STACK 


(SP)+, “5 
PC : RETURN 


sMESSAGE TABLE **exeeeeee 
031460 MSG1: ASCII = '"%XTMO3-TE16/TU77 CONTROL LOGIC TEST= PART | (CZTEABO)';++B 


eASCI] = /%***ASSURE TAPE IS AT BOT#*#/ 





CZTEABO TMO3-TE16/TU77 CT 


CZTEAB.P11 
3912 020721 


15-NOV-78 1 


2333 


So OoOOooO 


on 


oo 
WWOVINAOWS 
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020105 
042040 
042524 


031 


460 


041505 


-ASCII 


-ASCII 


-ASCII 


-ASCII 


/%TYPE <CR> TO TERMINATE RESPONSE & “C TO RESTART%#/ 


/%DRIVE NUMBER OR (CR) WHEN DONE #/ 


/%%FOR DRIVE ADDRESS TEST;/ 


/% ENTER EXPT DRIVE NUMBER, ALL OTHERS SHOULD BE NON-EXISTANT.4/ 


/%2NON~EXIST DRIVE &/ 


/%RH DETECTED &/ 


/%1M03 DETECTED #/ 


/EXPT=NOT RECVDA/ 


/RCVD=NOT EXPTA/ 


/%SLAVE NUMBER OR (CR) WHEN DONE 4/ 


/%%FOR SLAVE ADDRESS TEST; / 


SEQ 0102 
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3968 Ost zks 051523 
/% ENTER EXPT SLAVE NUMBER, ALL OTHERS SHOULD BE NON-EXISTANT.4/ 


MACs 


VW 
uw —OooO-0o—-OoOTfr 
QUINN 


eASCII] /2%NON-EXIST SLAVE 4/ 


«ASCII /%READ CONT BUS PAR #/ 
041040 
051101 
042524 >: .ASCII /2WRITE CONT BUS PAR #/ 


052120 : ASCII / EXPT #/ 
053103 020104 : ASCII / RCVD &/ 


051115 041040 : ASCII /2MR BITS 4-04/ 
020123 026464 


020122 044502 : ASCII] /%MR BITS 15-7#/ 
030440 026465 


042524 035122 : .ASCII /ZITER: #/ 


020103 044502 >: .ASCII /2%TC BITS 12-0 &/ 
030440 026462 


041040 >: .ASCII /%FC BITS 15-0 &/ 
032461 


-ASCII] /%FUN CODE BITS 5-1 OF C1 #/ 


/%GO BIT NOT CORRECT AT START &#/ 


/%GO BIT NOT SET 4/ 


NON | 
on Non 
NEOANNM No 


022023 /%GO BIT NOT RESET BY INIT #/ 
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052111 
051040 


R 

— 
=R 

oO 

oe 


MSG24: .ASCII /%DRY NOT SET BY INIT &/ 


oO 


MSG25: .ASCII /%DRY NOT RESET BY GO=14/ 


So=R=R=R 
SR 
— 
wi 
AD =n 


VIN SOUNMNUM HO NU 
oO 
o~N 
o-VWIS 
fWwWorfk -oO 
Ww 


MSG25A: .ASCII /%DRY NOT SET BY GO=04/ 


R RAAGRSR 


m 


MSG26: .ASCII /%NO INTERRUPT RETURNEDA/ 


228° 


2 
2 
12 
04 


4 
4 
2 

5 

3 
043 
040 
043 
045 
516 
4 
45 


0502 MSG27: .ASCII1 /%BAD STATUSA/ 
052101 051525 


047123 020072 MSG30: .ASCII / SN: &/ 


051105 020122 MSG31: .ASCII /%ERR NOT SET #/ 
ae0ie 042523 


020101 MSG32: .ASCII /%ATA NOT SET &/ 
042523 


041040 MSG33: .ASCII /%AS BIT NOT SFT &/ 


oS 
Ww 
Nm 
_ 
N 


0 MSG34: .ASCII /%SC NOT SET #/ 
020124 


051124 020105 MSG35: .ASCII /%TRE NOT SET #/ 
satel SK 042523 


020101 MSG36: .ASCII /%SLA NOT SET #/ 
042523 : 


020103 MSG37: .ASCII /%SSC NOT SET #/ 
042523 


043 MSG40: .ASCII / ? &/ 
042116 MSG41: .ASCII /%%END OF PASS #/ 
040520 


020104 MSG42: .ASCII /%DEAD TRACK #/ 
020113 


MSG43: .ASCII /%%MANUAL TESTS (14-17) INHIBITED: 
022450 020123 030450 








CZTEABO TMO3-TE16/TU77 CT 


CZTEAB.P11 


4080 
4081 


4109 


aed ad aah ad ane a a en cal a 
ed aad ed cad cae en cd a eld ed 


2 
023130 


15-NOV-78 


020103 


18:40 


NONO—hw 


042526 
0 


044440 
052123 


MACY11 30A(1052) 


oO 
RES 
RSS 

pats 


NWEWOS Of 


042514 
044120 
020124 
050130 


MN -- - OO 
OKA =A 


MSG44 : 


MSG45: 


MSG46: 


MSG47: 


MSGS5O: 


MSG51: 


MSG53: 


MSG54: 
MSG5S5: 
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ASCII 


ASCII 


-ASCII 


ASCII 


ASCII 


ASCII 


-ASCII 


-ASCII 


-ASCII 


-ASCII 
-ASCI] 


/RESELECT AND PRESS CONTINUE%4/ 


/ZREGISTER START: #/ 


/%VECTOR ADDRESS: #/ 


/%CS1 wC BA FC CS2 DS ER AS/ 


/ MR TCRA/ 


/%NOT RESET BY DRIVE CLEARA/ 


/%ALPHA NOT SETA/ 


/%UNEXPECTED ERROR BITSA/ 


/%BAD LRC #/ 
/%BAD CK #/ 


/%SETUP ERROR: CHECK WRAP 0 WITH CONTROL LOGIC TEST II TEST 7#/ 


SEQ 0105 


ee 
CZTEABO TMO3-TE16/TU77 C MACY11 30A(1052) 21=DEC-78 13:08 PAGE 106 
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62610) MSG56: .ASCII /%STATIC TESTS ONLY: #/ 


Ran 


MSG57: .ASCII /%TMO3 DRIVE: #/ 


R 


MSS7A: .ASCII /%1S CONTROLLER JUMPERED IN NON-STANDARD MODE ,/<15><12> 


RS328 
Nf SPU 
NW —NNOOOW 


fOno 


Nr 
We BS aH Lo 


— 
RRIA=SRSAS 
RR 
NIMO™N 
oul 


RAGR 
7 
OROMMNOS—S— 


/TYPE 2 FOR NON=STANDARD OR CR FOR STANDARD ? #/ 


_— fo 
SO MROWNRWWN UP UIA ~ 


AR 
N wn 
on--—-NMNOO 


R 


MSG58: . "%TE16/TU77 SLAVE: #';++B 
020067 
035105 


MSGS9: . /%A/ 
MSG60: 


‘ /\A/ 
053117 MSG62: . /%REMOVE TMDP FROM SLAVE TO BE TESTED%4/ 


041040 0 

052123 042105 

051101 053504 MSG63: . /%HARDWARE SWR IN A/ 

O33053 E SWR IN USE% 
052440 


042526 MSG64: . /%SLAVE TYPE: #/ :++B 
035105 


/TU77A/ 3++B 
/TE164/ 3++B 
J%SLAVE TYPE (O=TE16,1=TU77): #/ 3++B 


MSG68: /%%INCORRECT SLAVE TYPE!!! PROGRAM ABORTEDA/ ; 


0 
023576 020041 043517 
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040522 
051117 
046111 -ASCII /ILLEGAL#/ 7+4B 
021514 

STEST HEADER*«xexxenee 


-ASCII /%%L0GIC TEST 1: DRIVE ADDRESSING (M8909 RH)A/ 


Ne ng 4a 


RARRASR 
RHA 
~~ 
MROVIWw— 


/%%LOGIC REGISTER ADDRESSING (M8909 RH)#/ 


/%KL0GIC CONTROL BUS TEST (RH M8905-YB M8909) 4/ 


/%%L0GIC SLAVE ADDRESSING (M8905-YB M8933)4/ 


¥ 


/%2L0GIC MR BIT TEST (M8905~YB)4/ 


/%2ZL0GIC TC BIT TEST (M8905-YB) 4/ 


ARR ARAAAR ARARR 


/n*LOGIC FC BIT TEST (M8905-YR)4/ 


7514 
024256 020103 042524 052123 
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041506 
052040 
046450 
054455 
MSLT10: .ASCII /%%LOGIC : FUNCTION BIT TEST (M8905-YB)4/ 


MSLT11: /%%L0GIC : GO BIT TEST (M8909) 4/ 


034460 
044507 MSLTi2: . /%4L9GIC : DRIVE READY BIT (M8909) 4/ 


MSLT13: . /%%L0GIC : INTERRUPT TEST (RH)A/ 


/%KLOGIC : STATUS AT BOT,ON-LINE ,WRITE PROTECTED (NO WRITE RING) 


MSLT15: . /%%L0GIC : STATUS AT BOT, OFF-LINE ,wRITE PROTECTEDA/ 


052103 
024754 042105 
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SoSH 045 i MSLT16: .ASCII] /%%LOGIC TEST 16: STATUS AT EOT,ON-LINE,WRITE PROTECTED#/ 


SEQ 0109 


MSLT17: . /%%LOGIC TEST 17: STATUS AT ON-LINE ,WRITE ENABLEDA/ 


MSLT20: . /RALOGIC TEST 20: ILLEGAL FUNCTION TEST (M8909)4/ 


MSLT21: . /%RLOGIC TEST 21: RMR(M8909)4/ 


MSLT22: . /%%LO0GIC TEST 22: CPAR(M8909) 4/ 


R 


MSLT23: . /%%L0GIC TEST 23: FMT (M8905-YB M8906) 4/ 


ooo 


MMOL Wek 


MSLT24: . /ERLOGIC TEST 24: DPAR(M8906 RH)4/ 


AR BR 


eee 


MSLT25: /RRL0GIC TEST : NEF (M8909) #/ 


0254 
025440 022445 7 MSLT26: /RSLOGIC TEST 26: FCE (M8909) 4/ 
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CZTEAB.P11 15=NOV=78 
025446 020103 
031040 


—4 
wre 


SEQ 0110 


MSLT27: /2%RL0GIC TEST 27: ILR(M8909)4/ 


ee 


RRARRVRAR 


MSLT30: /%Z%LOGIC TEST 30:DTE (M8906 RH)4/ 


MSLT31: /%RLOGIC TEST 31: OP] (M8933)4/ 


VRARRRGARR 


MSLT32: /%2LOGIC TEST 32: UNS(M8909) 4/ 


GRR 
MSL OMK KF SMMNOS fF HOwnek fo 


MSLT33: /%%ZL0GIC TEST 33: PIP (M8909) 4/ 


_ 
WU & 
Nem 


ff OWE SO 


MSLT 34: /&RZLOGIC TEST 34: PES(M8931)4/ 


Seas 


04 
02 
04 
04 
03 
04 
02 
04 
04 
03 
04 
0 


ia) 


MSLT35: /%RL0GIC TEST : SAC (M8933 M8905-YR) #/ 


RAPE 
RENEE 
SSERELS 


04644 
054455 
MSLT 36: /%KLOGIC TEST : FCS(M8933 M8905-YB) 4/ 


Ssssz? 
Wyn 
W 


—MMIOWN WM 


/RALOGIC TEST 37: ACCL(M8933 M8905-YR) #/ 


SIEPSE F 


026126 022445 047514 


Lo) 
= 
> 
Ww 
Lo) 
~N 


MSLT4O: /RALOGIC TEST 40: PE TAPE MARK (M8932) a/ 
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MSLT41: . /%ZLO0GIC : NRZ TAPE MARK (M8934)4/ 


MSLT42: . /%2L0GIC : CRC (M8934) 4/ 


MSLT43: . /%2LOGIC > LRC (M8934) 4/ 
6040 
034470 
MSLT44: . /%KL0GIC : CORRECTABLE DATA (M8932 M8901)4/ 


MSLT45: . /%2ZL0GIC : INCORRECTABLE DATA (M8932 M8934) 4/ 


044507 MSLT46: . /%ZKL0GIC 5: PEF (M8932) #/ 
peels. 


50040 
034470 
044507 MSLT47: . /%2L0GIC : FC OVERFLOW <(M8905~-YB) #/ 


SRN 
COs f--]-NNWNE SHO 


MSLT5O: . /%2L0GIC : NEF wHEN WRITE PE ON NRZ SLAVE#/ 


LS hl 


042510 
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CZTEABO TMO3-TE16/TU77 C 


CZTEAB.P11 15-NOV-78 SEQ 0112 


oO 


052111 


MSLTS1: .ASCII /%%LOGIC TEST 51: NEF WHEN WRITE NRZ ON PE SLAVEA/ 


Wi SS atu 
Mm-O—NMPr 


IOAN FS AON 


026732 046123 021505 
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4484 

4485 sMANJAL INSTRUCT ION* *# ea awe 
4486 

4487 026740 


Oo 


23 9h MMSGO: .ASCII /2%TYPE CR WHEN READY;4/ 


BEES 
mui 
wo 


MMSG1: .ASCII /%XMOUNT TAPE WITH NO WRITE RING, LOAD TO BOT, SET TO ON LINE:A/ 


o- Oo 


RALREARAA FR 
-NONFSRNS SN POM 


/%SET TO OFFLINE: #/ 


ER GRARRRGRSS 


/2MOVE FORWARD TO EOT, ONLINE :4/ 


/%OFF LINE REVERSE PAST EOT, INSERT WRITE RING, ON LINE#/ 


042516 
053117 r « /%2MOVE TAPE TO BOT; ON LINEM/ 


027260 042516 
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; TAG MESSAGE 
053523 020122 S$MSWR: .ASCII /%SWR 
042516 020127 SMNEW: . / NEW 
046133 020101 ey % /%SLA 
047502 020124 : /%B0T 
046524 021440 tw /%1M #/ 
053506 020116 IMSS: “ASCII /2SDWN 47 
042520 020123 t « /RPES #/ 
051523 020103 Bt ls /%SSC 
051104 020131 a /%DRY 
050104 020122 tw /%DPR 
052116 020114 5710: . /ENTL 
047505 020124 a /%ECT 
051127 020114 ts /%WRE 
047515 020114 : ASC /%M0L 
044520 020120 to /%P IP 
051105 020122 : /%ERR 
052101 020101 : /%ATA 
046111 020106 t° /RILF 
046111 020122 es /%ILR 
046522 020122 : JERMR #/ 
050103 051101 : /%CPAR #/ 


052115 021440 2 /ZFMT &/ 
040520 020122 : ASC /%DPAR #/ 


047111 020103 b acy /%INC #/ 
050126 020105 1 i « /%VPE #/ 
042520 020106 : /&PEF a/ 
051114 020103 | ; SRLRC @/ 


027265 


S 
gSe 


oO 
3 
“N 
VIM MAVIAN JIVIO WUT 


RR RRRRLRRRLRLLLRRLRRLRLLLRLLRELLRLLR 


Oo 

N 
ww 
Sr 
* 


RRRRRRRRRK 


3 
5 
3 
5 
3 
5 
3 
5 
3 
5 
3 
5 
3 
5 
3 
5 
3 
5 
3 
5 
3 
5 
3 
5 
3 
5 
3 
5 
3 
5 
0 
5 
5 
3 
5 
3 
5 
3 
5 
3 
5 
3 


027542 





CZTEABO TMO3-TE16/TU77 ch I 
13:10 


CZTEAB.P11 


027774 


027776 


15-NOV-78 


045 


RERBAE 
EFEREERLER 
NVIO UMA AN A 


S25 
=R 


wo ou 
RRIVRRENR 
OVUINNOWONO 


oe 
SR 


RRRRRRRRER 


5 
5 
5 
3 
5 
3 
5 
3 
5 
3 
5 
0 


~~ 


177777 


051516 
041506 
051503 

4 


oO 
No 


Oounsk— fu WR 


_ 
—LN0O —-0O- — 


041501 
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020107 
020105 
021440 


047524 
022516 
052503 


042514 
051440 


021440 
020122 


020103 
020103 
020123 
046103 


-ASCII 


TMS33C: 


TMS33D: 


TMS33E: . 
TMS 34: 
T™MS35: 
TMS 36: 
TMS37: 
TMS38: 
TMS 39: 


/2NSG #/ 

/2FCE #/ 

/2CS_#/ 

/%11M #/ 

JENEF #/ 

/EDTE &#/ 

/%OPI _#/ 

/RWRITE OPI #/ 
/%READ OPI #/ 

/ OCCURED TO SOON%A/ 


/ OCCURRED TO LATE%A/ 


/ FAILED TO SET%&/ 
7RCORR #/ 
/%CRC #/ 
J%SAC #/ 
/EFCS #/ 
JRACCL &/ 


-EVEN 
WRITE BUFFER 


SEQ 0115 
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177777 


READ BUFFER 


030200 
030202 
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Q 
0) 
0 
0 
0) 
) 
0 
0 
0 
0 
0 
0 
0 
0 
0 
Q 
0 
0 
0 
0 
) 
0 
0 
0 
0 
0 
0 
0 
0 
0 
Q 
0 
Q 
0 
0 
0 
0 
0 
0 
0 
Q 
Q 
a] 
0 
0 
C 
0 
Q 
Q 
Q 
0 
0 
.Q 
Q 
0 
0 
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WRAP AROUND MESSAGE S****#« 

042045 020101 WMSG27: .ASCII /%DATA PAT:#/ 
040520 04 

045 WMSG31: .ASCII /%EOR CLEAR DID NOT CLEAR GO%#/ 
046103 
044504 
020124 103 
020122 021445 


Uv 
P) 
mn 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
C 
0 
0 
9 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
C 
0 
0 
C 
0 
0 
0 
0 
0 
0 
0 


0305 
030562 
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Q 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
Q 
Q 
0 
Q 
9 
Q 
Q 
0 
0 
Q 
0 
0 
0 
0 
0 
0 
0 
Q 
Q 
0 
0 
Q 
0 
0 
0 
0 
0 
0 


000000 
031324 
000000 


Oe 
" 
. 
- 
— 
oO 


031324 
000001 
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327 3284 3312s 


2 
3370 3413 


3195* 


1884* 
2057* 


2490* 
3003* 


2584 2709 2887 
1744 1793 1884 


2741 2747 2760 
3354 3358 3362 


0 
DRVCLR 015624 
DRVN 000620 

000522 


* 


2049* 2089* 2120* 


a * 
a ae 


WROD? WR NIWWw win 
oOo 

NCO Oo 

Soo? NON S 
WIM NIIP 
MRNWOOM—Mm Awst 
SYIWOVUINO—- GWOn 
WMODCO ONIN N AWN 


3125* 
32284 


3238 
32478 
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EORP2 015134 3236 32524 
ER 000524 1 1834 


WNINWNRN— WRN Wor 
OWOWCO -COf—O 


34.47% 


2149 


016710 2 2564 2721 


016724 


1712" = 1713s 


DOOOOO0000O 
acl co ca cath cal oad ih sl el 
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015144 2279 2307 2331 2385 2412 2452 252 2557 2580 2707 2880 2920 
2989 0 325 


527 
3033 3077 3119 3179 3210 2584 
3305¢ 


17420 
1779-1784 


1786 


xe MMM 
“>WNh- 


x MMM 


—+— 


1 

1 

1 

1 

1 

1 

2 
2B 
2 
2E1 
2E2 
2E3 
2lT 
2 

3 
3A 
3E 
3 

3 


x<x—bp we 
ot 


MERAH 
<< 


005530 
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005552 
00 


2176 
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0073 24208 = 2444 
2451 24538 
2475 


1844 1856 
1849 


25838 2631 


ISSR 


N a NOWOOW NO 


WOO RE 
MW OAL S 
OAako 


on 
BAVA 


1 
1] 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


0 
011 
011 
011 
011 
011 
011 
011 
011 
011 
011 
011 
011 
011 
011 
Q11 
011 
011 
011 
011 
011 
011 
012 
012 
017 
012 


Oye 

NVI 

On 

~~ 20 -~ 000 
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CROSS REFERENCE TABLE =~ USER SYMBOLS 
SEQ 0125 


18624 
1921 1927 


1929 
1917 19308 
28308 


285248 
288148 


BEAR AIA ARN 
Rae nec 


01 
01 
01 
01 
01 
01 
01 
01 
01 
01 
01 
01 
01 
01 
01 
01 
01 


WAG 
moO 


043 
30784 
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LT4SXX 


SRoSE 
—_ 


30884 
31204 


VIMOW 
zg 
Ww 
pat 
MINEWAP 


WWAWN AWA WW 
= 


UI 3 Se SY Se 

SMS WWI PO 

alias teal 

WWII 
W000 000 - - SH SS 
UWA ES OW 


¥ 


SROIAASARRAARRE 
g aae¥es 2 


OWO0O00O00M- + -- 
co oo 


] 
1 
1 
1 
1 
1 
1 
1 
1 
1 
3 
3 
3 
3 
3 
3 
1 
1 
1 
1 
1 
1 
1 
1 
1 
2 
2 


oo 


1949s 2054* 2346* 2361 2364 
2597 2602 
= 3009*  3054* 
3099 3132s 3141* 3 3231* 3337 
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ROSS REFERENCE TABLE == USER SYMBOLS SEQ 0127 
38984 


39924 
39944 


40024 
40074 


2199 2222 40444 


023503 
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CZTEABO TMO3-TE16/TU77 CTL I 
13:10 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0128 


CZTEAB.P11 15-NOV-78 
023510 


002340 1 a ve ee nt 
020010 5 1627 1636 = 1646 = 1720S 3275) 3306 = 3455 3459 346537518 
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3322 3324 3326 3328 3330 3332 3334 3336 3338 3340 37498 
3771 3775 3780 3785 3787 37924 

37984 

37584 


3754 3798* 38044 


a aa 
3283* 3350* 3384* 3388 3425* 3430 3434* 3440* 3466* 3471 


1927* 


2850* 


1685* 
‘ 


W-2-—3 = 2 = 
WN 


32164 
1866 2143 


— 3 fy 2 = es 
W 2) 





CZTEABO TMO3-TE16/TU77 CT 
15=NOV-78 1 


CZTEAB.P11 
Swk 000570 
SWREG 00017 

TADX 001326 
TC 000542 
TEMP1 000670 
TEMP2 000672 
TEMPS 000674 
TEND 002552 
TENDX 002650 
TEX 017776 
TIB. 12 
TIMER 010576 
TIMERO 010622 
TIMER] 010552 
TIMOK 010670 
TIMON 010504 
TIMOVF 010634 
TINER 017600 
TKB 000574 
TKS 000572 
TLAST 001330 
TS1 027305 
TMS10 027373 
T™S11 027401 
TS12 027407 
T™S13 027415 
™S14 027423 
T™S15 027431 
TS16 027437 
TMS17 027445 
TMS18 027453 
TMS19 027461 
TMS2. 027313 
TMS20 027467 
TMS21 027476 
TMS22 027504 
TMS23 027513 
TMS24 027521 
TMS25 027527 
TMS26 027535 
TMS27 027543 
TMS28 027551 
TMS29 027557 
™S3 27321 
TMS30 027564 
TMS31 027572 
TMS32 027600, 
T™S33 027606 
TMS33A 027614 


I 
21 


45904 


MACY11 30A(1052) 


45834 
45364 


21-DEC-78 
1556* 1664 
3241 3249 
3460 3468 
3618 3627 
1977* 1978 
2568* 2694* 
2816 2834* 
2237* 2241 
1771 1774 
1911 

3663 3668 
26144 2620 
3697 37054 
3714 

3523 


2853* 
2254* 
1862* 


3678 
2622 


N 10 
13:08 PAGE 131 
CROSS REFERENCE TABLE == USER SYMBOLS 


3681 


3688* 


3689 


1799 
3650s 


LAN 
4 


3716* 


3717* 


3718 


SEQ 0130 
2141 
34 
3864 


CZTEABO TMO3-TE16/TU77 CT 
CZTEAB.P11 15=NOV-78 1 


TM™S338 027630 
TMS33C 027643 


I 
710 


-2——WIWh- == WRIN 
BSSINARR Sg SNSSSRSe 
= 
WAN 


MACY11 30A(1052) 21=DEC-78 13: 08 |p PAGE 132 
CROSS REFERENCE TABLE -= USER SYMBOLS 


3724 3725 3727 3731* 
3853* 
3735 3739 37414 3742 
3817* 


» °) 
ah 
aR 


SI NNO O 
—o 
fw 


Ooo 
ON 


. 
! 
1 
1 
2 
2 
3 
1 
1 
3 


QEBBASENS VENA 
> ghee =AO-00uWr 


2995* 3040+ 


3734* 
3789 


3738* 
3801 


3743 
3854 


3788* 


3800* 


SEQ 0131 


3810* 
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1583 1585 1590 


2239* =2345* 2425% 2904" 2925% 2963*  3000* 3045* 3089*  3128*  3162« 


2965 3002 3047 3091 3131 3164 


64 : 
031326 12814 12834 12854 1289% 12954 12994 13034 13134 26134 


020556 : 38864 
020534 ; 38764 
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- ABS. 


ERRORS DETECTED: 0 


DSKZ : CZTEAB, DSKZ: CZTEAB. SEQ/CRF /SOL=CZTEAB. SML/ML ,DSKM: CZTEAB.P11 
RUN-TIME: 6 10 1 SECONDS 

RUN-TIME RATIO: 144/18=7.8 

CORE USED: 11K (21 PAGES) 





